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THESE THREE DIAGNOSTICS WILL ASSUME THAT THE PDP 




< 


205 

2m 
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THE PROGRAM MAKES ONE PASS FOR EACH END OF PASS 


c 


325 




MESSAGE TYPED, THE END OF PASS MESSAGE DESCRIBES 
THE TOTAL NUMBER OF PASSES COMPLETED AND THE TOTAL 




327 
328 




NUMBER OF ERRORS SINCE THE LAST END OF PASS MESSAGE, 


t 


329 
330 


8,4 


T-BIT TRAPPING 


€ 


331 
33? 




IF SW<12>=0 EACH PROGRAM WILL RUN WITH TRACE TRAPS 
ON EVERY OTHER PASS. FIRST PASS WILL NOT ENABLE 




333 




TRACE TRAPS, NOTE SW<12>-1 DISABLES T-BIT TRAPS, 


< 


335 
3 3 h 


8.5 


SOFTWARE SWITCH REGISTER 


< 



i 



I 

MAlNPEC-ll^DFFPB-A PDP 11/34 FPP DIAGNOSTIC PART 2 MAC ¥11 2 7( 1 00 6 ) 07-FEB~77 12;Q6 PAGE 7 _ ' 

II DFFPBA.PU 01-NOV-76 21 :06 1 





337 




EALH Ur IHfc IrtK&c* rHUuKftWo WAuLi "UN Willi UK wixnuui 


i 

1 


f 


33$ _ 




A CONSOLE 5«ITCH REblSIEK. if A rli I o 1 v, A Jb lUH&ULt 




339 


— — * 


e uj T Tr U R Pf* T c. D R F «s F N T DM THF SYRTfM, TMFKi THPSF 






^,.Jf3L _ _ 




PROGRAMS WILL bU AHEAD A«D uoe, 11 r UK lflfc, oniiltl 




c 


341 


- — ■ - " ■ ■■ ■" ~ 


FUNCTIONS DESCRIBED IN 5.1 ABOVE, IF HOWEVER THERE 


f 




— — 342 — — 




IS NO CONSOLE SWITCH REljlSiEK UN infc pliaitM A 






343 






4 


4 
1 


344 




50r IWARE SWIIXH HEG151EK LAN dl tAAniNtU UK t^UiJiP icy 




345 




AT ANl IJLMfc, ri X inc. USER ir Ml llrto LUn 1 KUu v» wr|j,|^c 






346 




THE PROGRAM IS RUNNING, IHIS LUw 1 KUu G WILL LAUOt 




1 


347 
348 




THE CONTENTS OF THE SOFTWARE SWITCH REGISTER TO BE 
TYPED ON THE Til AND ASlS THE Uofc-K rUH A NEW VALUE. 


4 




349 




WHEN fHE, Uofc.K 1 x PL5 A VALUE ANU LAKRIAvjE. K&iUKN intw 




f 


350 




THE PROGRAM WILL RESUME 1ESIING Ai Int SAMc. rUINl Ai 


1 




351 










352 




NOTE THAI Wnt.N NU1 KUniNlNvj u w u c, K AL. I $ Arl UK vWAJtw 




1 


353 
354 




REGISTER VALUE Arl 6.K LUAPlWb Al/yKfe,oo 4fOU AWU 


| 




355 




STARTING THE PROGRAM THE FIRST TIME THE PROGRAM IS 


g 

m 


g 


356 




RUN AFTER LOADING (UNLx ir NU LUNoUL»& aflULn 




357 




DP/'TCI'PD TO nki T'lJC CVCTS*M\ 






358 








< 


359 






f 




360 


8.6 


INTERRUPTS TEST 




1 


361 

362 




IN PROGRAM Dp r Pd THclkc* IS A SP&t.AAL lCfS4 rUK 


t 




363 
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365 
366 




SYSTEM. THIS MODULE *ILL PROBABLY ONLY BE USED IN 
MANUFACTUhlNG. Ir THIS MUDULE NUl API Irtt olol&n 


f 




367 




THIS TEST HILL AUTOMATICALLY BE DESELECTED. IF THIS 




1 


368 




FESI MODULE IS ON IHE SXSIEM ANU SW^i>«-0 *nIS IEoA 






369 




WTT.r. RW pt]M TF SW<7>:1 THTS TFST W 1 Til. RF 






370 




DESELECTED . 




1 


371 
372 






i 
% 


1 


373 
374 


8,7 


ACT, APT AND XXDP COMPATIBILITY 


gt 

-1 














376 




APT 




f 


377 




ACT 


« 




376 




XXDP MONITOR AND CHAIN PROGRAMS. 




i 


379 
380 






1 




381 




_ , — . _ 






382 








1 


383 
384 






£ 


| 


385 
386 






g 

* 




387 










388 


9. 


PROGRAM DESCRIPTION 




c 


389 






4 




"590 








« 


391 






4 



MAINDEC~U-DFFPB-A 



PDP 1 i/34 FPP DIAGNOSTIC PART 2 M AC 1 1 1 27 ( 1 006 ) 07»F£B~77 12SQ6 PAGE 8 



DFFPBA.P11 



01*NOV-7fe 2l!06 





393 
394 




— — ~- — ■ — — « ■ -^■ — ^r - — - : ^^m, : 


i 

I 




395 


: _ 

TEST 1 


RQUNDXTRUNK TEST 




1 


397 

398 






< 


i 


399 

400 , 


, — ,^ „„ ^, „ _ 


THIS IS A TEST OF THE ROUNDSTRUNK FLOWS. IN 
PARTICULAR TWO THINGS ARE I&oIEP" r IKoJL A CUNUl 1 XUN 


i 
i 




401 

402 




IN WHICH ROUNDING RESULTS IN THE NEED FOR 
REN0RHALIZATION f AND SECOND THE P5W CONDIXXON COufck 




« 


403 
4»4 




N AND % BIT COMBINATIONS 


< 


1 


405 
406 


TEST 2 

: ^ 


OVERSUNDER TEST 


g 




407 
408 




THIS IS A PARTIAL TEST OF THE OVERXUNPER PLOWS. ONE 




i 


409 
410 


: 


OVERFLOW AND TWO UNDERFLOW CONDITIONS ARE CHECKED. 
THE REMAINING UNDERFLOW C0NP. AND THE REMAINING 


t 


g 


411 
412 


. _ . 


OVERFLOW C0ND. WILL BE CHECKED LATER USING THE XXX 
INSTRUCTION, HERE EACH CONDITION AEolED 15 CHECKED 


j 
i 




413 
414 




BOTH WITH TRAPS ENABLED CFIUsl OR FIVsl) AND ALSO 
WITH TRAPS DISABLED (FIUsu OR FIVsO}. 




< 


415 
416 


m r~*. r* *n *\ 

TEST 3 


LDCFD AND LDCDF TEST 


c 


1 


417 

418 






M 

1. 




419 
420 




THIS IS A TEST OF LDCFD AND LDCDF S 




1 


421 
422 


TEST 4 

mmmmwum 


CMPD TEST 


€ 


J 
1 


423 
424 




THIS IS A TEST QV THE C$PU INSlKUclXUN. NUIE JLHAl A 


1 




425 
426 


: 


SUBROUTINE IS USED TO SET UP OPERANDS, EXECUTE THE 
INSTRUCTION AND CHECK THE KESULic* 




€ 


427 
428 


TEST 5 


PIVD rtlTH (pSRC-Oj ANli loUl rUJ IE51 


C 


1 


429 
430 






1 




431 

432 




THIS IS A TEST OF THE D.IVD INSTRUCTION WITH A ZERO 
DIVISOR. THE CONDITION IS CHECKED WXIH BOIri IRAr 




1 


433 




ENABLED AND TRAPS DISABLED, 


i 


M 
1 


435 
436 


TEST 6 


DIVF TEST 


» 




437 
438 




THIS IS A TEST OF THE DXVr I N&TRUCTinN , NOTE THAT A 




4 


439 
440 




SUBROUTINE IS USED TO SET UP THE OPERANDS, EXECUTE 
THE INSTRUCTION AND CHECK THE RE5UL 15 . 


i 


g 

1... 


441 
442 


— _ — — , . — 

TEST 7 


DIVD TEST 


g 




443 
444 
















i 


445 
446 




THIS IS A TEST OF THE DIVD INSTRUCTION. NOTE THAT A 
SUBROUTINE IS USED TO SET UP THE OPERANDS, EXECUTE 


i 


1 


447 
448 




THE INSTRUCTION AND CHECK THE RESULTS. 


i 



c 



i 
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449 
45.0 


TEST 

, __ ; : : — ! 


10 


MULF TEST 


i 


451 
452 






THIS IS A TEST OF THE MULF INSTRUCTION* IT MAKES 
USE OF A SUBROUTINE TO SET UP THE OPERANDS, EXECUTE 




453 
454 






THE MULF INSTRUCTION AND CHECK THE RESULTS. 


4 


455 


TEST 


11 


MULD TEST 












457 
458 






THIS IS A TEST OF THE MULD INSTRUCTION. NOTE THAT A 




459 
460 






SUBROUTINE IS USED TO SET UP THE OPERANDS, EXECUTE 
THE MULD INSTRUCTION AND CHECK THE RESULTS. 


< 


461 

462 


TEST 


12 


UNDERVOVER FLOW, USING MULF WITH TRAPS DISABLED, TEST 


g 
I 


463 
464 


















465 
466 






THIS IS A TEST OF THE OVERFLOW AND UNDERFLOW 
CONDITIONS USING THE MULF INSTRUCTION WITH TRAPS 


1 


467 

468 


— — — 




DISABLED, NOTE THAT A SUBROUTINE IS USED TO SET UP 
THE OPERANDS, EXECUTE THE MULF INSTRUCIIUN AND CHLCK 


S 
I 


469 
470 






THE RESULTS • 




471 
472 


TEST 


13 


UNDERXOVER FLOW, USING MULD WITH TRAPS DISABLED, TEST 


< 


473 
474 






THIS IS A TEST Or THE OVERFLOW AND UNDERFLOW 


g 


A *t C 

1 ( vf 

476 






CONDITIONS THAT CAN ARRISE USING THE MULD 
INSTRUCTION WITH TRAPS DISABLED. A SUBROUTINE IS 




477 

478 






USED TO SET UP THE OPERANDS, EXECUTE THE MULD 
INSTRUCTION AND CHECK THE RESULTS. 


"€ 


479 
480 


TEST 


1 4 


uNDERNOVER FLOW, USING MULF WITH TRAPS ENABLED, TESi 




481 
482 










483 
484 




- 


THIS IS A TEST OF THE UNDERFLOW AND OVERFLOW 
CONDITIONS THAT CAN OCCUR USING THE MULF 


€ 


485 
486 






INSTRUCTION. A SUBROUTINE IS CALLED TO SET UP THE 
OPERANDS, EXECUTE THE MULF INSTRUCTION AND CHECK THE 


4 


487 

488 







RESULTS. HERE THE PARTICULAR INTERRUPT, EITHER 
OVERFLOW OR UNDERFLOW, IS ENABLED SO A TRAP SHOULD 




489 
49ft 






OCCUR, 


( 


491 
492 


TEST 


15 

m m 


UNDERNOVER FLOW, USING MULD WITH TRAPS ENABLED, TEST 


g 

1 


493 
194 


_ 




: : : 

THIS IS A TEST OF THE OVER FLOW AND UNDER FLOW 




495 
496 






CONDITIONS USING THE MULD INSTRUCTION WITH TRAPS 
ENABLED. A SUBROUTINE IS USED TO SET UP THE 


< 


497 

498 






OPERANDS, EXECUTE THE MULD INSTRUCTION AND CHECK THE 
RESULTS. 


t 


499 
500 


TEST 


16 


MODF TEST 




501 
502 








t 










503 
504 






THIS IS A TEST OF THE MODF INSTRUCTION, WHICH MAKES 
USE OF A SUBROUTINE TO SET UP THE OPERANDS, EXECUTE 


t 



c 



I 
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505 
506 




THE MODf INSTRUCTION AND CHECK THE, RESULTS. 




507 
508 




TEST 17 MODD TEST 




509 

510 _ „ _ 




THIS IS A TEST OF THE MODD INSTRUCTION. IT MAKES 




511 




USE OF A SUBROUTINE TO SET UP THE ARGUMENTS* EXECUTE 
THE INSTRUCTION AND CHECK THE RESULTS, 




513 
514 




TEST 20 UNDERXOVER FLOW, USING MQDF WITH TRAPS DISABLED, 


TEST 


515 












- 


517 
518 




THIS IS A TEST OF THE M0DF OVERFLOW AND UNDERFLOW 
CONDITIONS. IT MAKES USE OF A SUBROUTINE TO SETUP 




519 
520 




THE OPERANDS, EXECUTE THE MODF INSTRUCTION AND CHECK 
THE RESULTS. TRAPS ARE DISABLED DURING THIS TEST. 




521 
522 




TEST 21 UNDERNOVER FLOW, USING MODD WITH TRAPS DISABLED, 


TEST 


523 
524 








525 
526 




THIS IS A TEST OF THE MODD INSTRUCTION * S OVER FLOW 
AND UNDER FLOW CONDITIONS. A SUBROUTINE IS USED TO 




527 
528 




SET UP THE OPERANDS, EXECUTE THE MODD INSTUCTION AND 
CHECK THE RESULTS. 




529 




TEST 22 INTERRUPT CORRECT FLOWS TEST 




J 1 

532 








533 
534 




THIS IS A TEST OF THE 'CORRECT* FLOWS. THIS PART OF 
THE MICRO CODE HAS AS ITS PURPOSE INSURING THAT 




535 
536 




INTERRUPT REQUESTS MADE DURING CERTAIN LENGTHY FPP 
INSTRUCTIONS GET HONORED. THIS IS DONE IN A WAX 




537 
538 




SUCH THAT IF AN INTERRUPT REQUEST OCCURS DURING ONE 
OF THESE INSTRUCTIONS THE STATE OF THAT 




539 
540 




INSTRUCTION'S EXECUTION WILL BE THE SAME AS IF THAT 
INSTRUCTION HAD NEVER BEEN FETCHED AND ITS EXECUTION 




541 
542 




NEVER STARTED. THUS THE MICRO CODE WILL RESTORE ALL 
REGISTERS, BACK UP THE PC AND LEAVE THE EPS AND ACO 


i 


543 




THROUGH AC5 UNMODIFIED. 

THE INSTRUCTIONS FOR WHICH THIS IS NECESSARY ARE s 




545 
546 




ADD COR SUB) 




547 
548 




DIV 
MUL 




549 
550 




MOD 

(BOTH DOUBLE AND FLOATING) 




551 
552 




ALL ADDRESSING MODES WILL BE TRIED WITH THE ADDD 


i 


553 
554 




INSTRUCTION. THEN EACH OF THE OTHER INSTRUCTIONS 
WILL BE TRIED USING MODE 1. NOTE THAT THIS TEST 




555 
556 




NEEDS A SPECIAL INTERRUPT MODULE, WHICH WILL 
PROBABLE ONLY BE PRESENT IN DEC'S MANUFACTURING 




557 
55ft 




ENVIRONMENT, TO RUN. THIS SPECIAL EQUIPMENT IS 
DESIGNED TO RAISE AN INTERRUPT REQUEST IN THE 




559 
560 




PROCESSOR IF A BIT IS SET IN ITS STATUS REGISTER AND 
ONLY WHEN AN FPP INSTRUCTION IS ENCOUNTERED. 


i 
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t 


561 

562 




THEREFORE THIS TEST ft ILL BE RUN CONDITIONALLY 
(DEPENDENT UPON WHETHER OR NOT THE STATUS REGISTER 


1 


563 
564 




OF THE TEST EQUIPMENT TINES OUT tfHEN REFERENCED) • 
THIS TEST CAN ALSO BE DESELECTED BY TURNING SWITCH 7 




565 

566 .... _ . 




OF THE SWITCH REGISTER (PHYSICAL OR VIRTUAL) 0N f 
THE TEST ASSUMES THAT THE TEST EQUIPMENT'S STATUS 


1 


567 
568 




REGISTER IS AT LOCATION 777774 (NOTE THAT ALL 
REFERENCES TO THIS LOCATION ARE MADE INDIRECT 


1 


569 
570 




THROUGH THIS PROGRAMS LOCATION CORINT, SO THAT IF 
THE USER HAS MODIFIED THE TEST EQUIPMENT'S STATUS 




571 

57? 




REGISTER TO RESPOND TO A DIFFERENT ADDRESS LOCATION 
CORINT MUST BE MADE TO CONTAIN THAT STATUS 


1 


573 
574 




REGISTER'S NEW ADDRESS) • THIS PROGRAM ASSUMES THAT 
THE TRAP VECTOR FOR THE TEST EQUIPMENT IS 110, 


1 


575 
576 




AGAIN NOTE THAT ALL REFERENCES TO THIS TRAP VECTOR 
ARE INDIRECT, THROUGH THIS PROGRAM'S LOCATION CORTRP 




577 
578 




(IF THE TEST EQUIPMENT IS MADE TO TRAP TO A 
DIFFERENT VECTOR LOCATION CORTRP MUST CONTAIN THE 


t 


579 
580 




ADDRESS OF THIS VECTOR) , 


t 


581 


583 
584 






f 


585 
586 






t 


587 
588 


589 
590 




10- LISTING 


i 


591 
592 






l 


593 
594 


595 € 

596 


597 

598 I 


599 
600 




& 




601 

65? 000266 




MNUMBER=266 


C 


603 000002 
604 




PR0GNUMS2 


. ... ._. ._ _ € 


605 
606 


607 
608 




•LIST ME 
.NLIST MD# MC * CND 


4 


609 
610 






i 


611 
612 


613 1 
614 



615 
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I 


617 

6 1 8 










619 
620 


1 621 


I 


623 
624 










625 
626 


1 


627 
628 










I 


629 
630 










631 
632 


4 


633 
$34 






•EN ABL ASS 




i 


635 
636 












637 
638 







.TITLE MAINDEC*! 1»DFFPB*A POP t!/i4 FPP DIAGNOSTIC PART 2 




f 


639 
640 






j*C0PYRIGHT (C) SEP 1976 
j*DIGITAL EQUIPMENT CORP. 




i 


641 

642 






?#MAYNARD f MASS, 01754 

;* 






643 
644 






;*PROGRAM BY ANTHONY S. VEZZA 
* # 




4 


645 
646 






?#THIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
;»PACKAGE (MAINDEC-1 1-DZQAC-C2) # SEPT 14, 1976, 




€ 


647 
648 


000001 




* * 

STNsl 






649 
650 


160000 




$SWRsl60000 9 ? HALT ON ERROR # LOOP ON TEST, INHIBIT ERROR TYPQUT 




i 


651 
652 


000244 




FPVECT=244 




1 


653 
654 


177400 
000200 




$SSflJRsl77400 
$SWRMSKs200 






655 
656 


000011 
000015 




TAB=1 1 
CRLF=15 




i 


657 
658 






.SBTTL BASIC DEFINITIONS 




I 


659 
660 






J*INITIAL ADDRESS OF THE STACK POINTER #** 1100 #*# 






661 


oonoo 




STACKS 1100 

-EQUIV EMT. ERROR JJBASIC DEFINITION OF ERROR CALL 




4 


663 
664 






.EQUIV IOT, SCOPE ?;BASIC DEFINITION OF SCOPE CALL 




t 


665 
666 


000011 




^MISCELLANEOUS DEFINITIONS 

HT= 11 ;;C0DE FOR HORIZONTAL TAB 






667 
668 


000012 
000015 




LF= 12 ? jCODE FOR LINE FEED 

CR- 15 ; ;CODE FOR CARRIAGE RETURN 




i 


669 

67ft 


000200 
177776 




CRLFs 200 j?CODE FOR CARRIAGE RETURN-LINE FEED 
PS= 177776 : ; PROCESSOR STATUS WORD 




1 


671 
672 


177774 




.EQUIV PS,PSW 

STKLMTs 177774 J?STACK LIMIT REGISTER 





( 



4AINDEC-1 l-DFFPB^A 



POP 11/34 FPP DIAGNOSTIC PART 2 MACYll 2 7 ( 1 00 6) Q7-FEB-77 U;06 PAGE 13 



>FFPBA.P11 


01~N0V-76 21506 


BASIC 


DEFINITIONS 




673 

674 


177772 
177570 


PIRQs 


177772 j -PROGRAM INTERRUPT REQUEST REGISTER 
177570 ; \ HARDWARE SWITCH REGISTER 


675 

676 


177570 


DDISP- 


177570 j j HARDWARE DISPLAY REGISTER 


677 
678 


__ . 

000000 


J#GENERAL PURPOSE REGISTEJ 
R0 = %0 • ' 


I DEFINITIONS 
GENERAL REGISTER 


679 
680 


000001 
000002 


Rl = 
R2s 


%l J! 
%2 ? 


f GENERAL REGISTER 
! GENERAL REGISTER 


681 

682 


000003 
000004 


R3 = 
R4 = 


%3 r 
%4 ?i 


f GENERAL REGISTER 
' GENERAL REGISTER 


683 
684 


000005 
000006 


R5 = 
R6s 


%5 ; ; 
%6 :< 


^GENERAL REGISTER 
s GENERAL REGISTER 


685 
686 


000007 
000006 


R7 = 
SP= 


%7 7 ! 
%6 ? j 


f GENERAL REGISTER 
f STACK POINTER 


687 
688 


000007 


PC = 


%7 ; j PROGRAM COUNTER 


689 
690 


000000 


J*PRIQRITY LEVEL DEFINITIONS 

PROs ^PRIORITY LEVEL 


69! 

692 


000040 
000100 


PR1* 
PR2 = 


40 ^PRIORITY LEVEL 1 
100 ; ; PRIORITY LEVEL 2 


693 
694 


000140 
000200 


PR3 = 

PR4 = 


140 jjPRIORITY LEVEL 3 
200 ^PRIORITY LEVEL 4 


695 
696 


000240 
000300 


PRSs 

PR6s 


240 j, 'PRIORITY LEVEL 5 
300 j j PRIORITY LEVEL 6 


697 

698 


000340 


PR 7 *» 


340 ?jPRIQRITY LEVEL 7 


699 
70Q 


100000 


*#"£WITCH REGISTER" SWITCH DEFINITIONS 
SW15s 100000 


701 
702 


040000 
020000 


SW14s 
SW13= 


40000 
20000 




7d3 
704 


010000 
004000 


SW12s 
SNlls 


10000 
4000 




705 
7t>6 


002000 
001000 


SWIOs 
SW09* 


2000 
1000 




707 
708 


000400 


SW08 = 
SW07* 


400 
200 




7D9 
710 


000100 
000040 


SH06s 
SW05 = 


100 
40 




711 
712 


000020 
000010 


SW04= 
SW03* 


20 
10 




713 
714 


000004 
000002 


SW02* 


4 

2 




715 
716 


000001 


SWOO* 
.EQUIV 


1 

SW09.SW9 




717 
718 




, EQUIV 
.EQUIV 


SW08,SW8 
SW07 f SW7 




719 

72n 


„ — „ 


.EQUIV 
.EQUIV 


SW06 f SW6 
SW05.SW5 




721 
722 


_____ , — 


, EQUIV 
.EQUIV 


SW04, SW4 
SW03.SW3 




723 
724 




.EQUIV 
-EQUIV 


Sw02 f SW2 
SW01.SW1 




725 
7?6 




, EQUIV 


swoo,swo 




727 

728 


100000 


?*DATA 
BIT15= 


BIT DEFINITIONS (BITOO TO BIT15) 
100000 



i 
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729 
730 


040000 
020000 


BIT14= 
BIT1 3~ 


40000 
20000 


„ — — — . _ : ___________„ 

. .. _ _ : 




— — 


— — — — 


731 

732 


010000 
004000 


BIT12S 
BIT1 1= 


10000 
4000 




— — 





— . 


733 


002000 
001 0Q0 


BIT10* 
BIT09= 


2000 
1000 


„__. _ 

— — — — — 




— — — 


— — 


--- ■ 


735 
736 


000400 
000200 


BIT085 
BIT07= 


400 
200 


' 


— 


— -— — 




737 
738 


000100 
000040 


BIT06= 
BIT05* 


100 
40 












739 

740 


000020 
000010 


BIT04s 
BIT03= 


20 
10 










741 
742 


000004 
000002 


BIT02* 
BIT01= 


4 
2 










743 
744 


000001 


BIT0O= 
.EQUIV 


1 

BIT09*BIT9 










745 
746 


, 


.EQUIV 

-EQUIV 


BIT08 f BIT8 
BIT07,BIT7 


— ___ , , _ 








747 
748 




.EQUIV 
.EQUIV 


BIT06, BIT6 
BIT05#BIT5 










749 
750 




.EQUIV 
.EQUIV 


BIT04, BIT4 
BIT03# BIT3 










751 

752 




, EQUIV 
.EQUIV 


BIT02,BIT2 
BIT01 t BIT1 










753 
754 




.EQUIV 


8IT00,BIT0 










755 
756 


000004 


$#BASIC 
ERRVECs 


"CPU* TRAP VECTOf 
4 ' 


X ADDRESSES 

f;TIME OUT AND OTHER ERRORS 


757 

759 


000010 
000014 


RESVEC* 
TBITVEC 


10 

sl4 J 


PRESERVED AND ILLEGAL INSTRUCTIONS 
?;*T" BIT 


759 
760 


000014 
000014 


TRTVECs? 
BPTVECs 


14 ; 
14 ! 


I 'TRACE TRAP 

p 1 BREAKPOINT TRAP (BPT) 


761 
762 


000020 
000024 


IOTVEC* 
PtfRVEC* 


20 i 
24 1 


r; INPUT/OUTPUT TRAP (IOT) *#SCOPE*# 
rjPOWER FAIL 


763 
764 


000030 
000034 


EMTVEC- 
TRAPVEC 


30 J 
= 34 ; 


f ; EMULATOR TRAP CENT) **ERROR*# 
f J "TRAP" TRAP 


765 
766 


000060 
000064 


TKVECs 
TPVEC= 


60 ! 
64 i 


f ; TT¥ KEYBOARD VECTOR 
f;TTY PRINTER VECTOR 


767 
768 


000240 


PIRQVEC 


= 240 : 
•SBTTL FPP REGIS 


j ; PROGRAM INTERRUPT REQUEST VECTOR 
5TER DEFINITIONS 


769 
77Q 


000000 
000001 


ACO 
AC1 


no 

=%1 










771 
772 


000002 
000003 


AC2 
AC3 


s%2 
s%3 










773 
774 


000004 
000005 


AC 4 
AC 5 


s%4 

s %5 










775 
776 


000006 
000007 


AC6 
AC7 


=%6 

*17 _ _„ _ 










777 
778 




.SBTTL 


TRAP CATCHER 










779 
780 


000000 




.=0 










781 
782 




; #ALL UNUSED LOCATIONS FROM 4 - 776 CONTAIN A " . +2 » HALT " 
:*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 








783 
784 


000*74 


.•♦LOCATION CONTAINS TO CATCH IMPROPERLY LOADED VECTORS 
. = 174 
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DISPREG: m mm j;SOFTWARE DISPLAY REGISTER 

SfrREG : .mm ;;SQFTWARg switch register 

787 .SBTTL STARTING ADDRESS (ES) 

788 000200 000137 004336 JMP $#START jjJUMP TO STARTING ADDRESS OF PROGRAM 



785 000174 000000 

786 000176 000000 
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789 .SBTTL COMMON TAGS 

790 , , ... . , 

791 j •##########*#♦##*####**##*###♦#####*####*####♦########*#*##*#### 

792 ;»T HIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 

793 J*USED IN THE PROGRAM, 

794 

795 OOUOO ,sll00 



796 


QOUQO 




scmtag : 








JJSTART OF COMMON TAGS 


797 


001 100 


000000 




.WORD 










798 


001102 


000 


$TSTNH3 


# B Y T E 







• ; CONTAINS THfe, TEfcT NUMBLR 


799 


001103 


000 


SERFLG: 


• BYTE 







jjCONTAINS ERROR FLAG 


800 


001 104 


000000 


sicnt; 


.WORD 







JjCONTAINS SUBTEST ITERATION COUNT 


801 


001106 


000000 


SLPADRs 


.WORD 







JjCONTAINS SCOPE LOOP ADDRESS 


802 


001110 


000000 


SLPERRS 


.WORD 







JjCONTAINS SCOPE RETURN FOR ERRORS 


803 


001112 


000000 


SERTTLs 


.WORD 







jjCONTAINS TOTAL ERRORS DETECTED 


804 


001 114 


000 


SITEMB: 


♦ BYTE 







J 'CONTAINS ITEM CONTROL BYTE 


805 


001115 


001 


$EPMAX? 


.BYTE 


1 




jjCONTAINS MAX. ERRORS PER TEST 




001116 


OOOOOQ 


$ERRPCJ 


. WORD 







jjCONTAINS PC OF LAST ERROR INSTRUCTION 


807 


001120 


000000 


SGOADR: 


.WORD 







• jCONTAINS ADDRESS OF *GOOD* DATA 


Bm 


001122 


000000 


SBDADR5 


.WORD 







••CONTAINS ADDRESS OF 1 BAD * DATA 


809 


001 124 


oooooo 


$GDDAT; 


.WORD 







^CONTAINS 'GOOD 1 DATA 


810 


001126 


000000 


$BDDAT; 


.WORD 







?f CONTAINS *BAD* DATA 


81 1 


001 1 30 


oooooo 




.WORD 







J ;RESERVED»-NOT TO BE USED 


812 


001132 


oooooo 




• WORD 









813 


001 1 34 


000 


sautob: 


• BYTE 







?;AUTOMATIC MODE INDICATOR 


814 


001135 


000 


SINTAGl 


.BYTE 







ri INTERRUPT MODE INDICATOR 


815 


001 1 36 


oooooo 




.WORD 









816 


001140 


177570 


SWR? 


.WORD 


DSWR 




fjADDRESS Of- SWITCH REGISTER 


817 


001142 


177570 


DISPLAY: 


.WORD 


DDISP 




? j ADDRESS OF DISPLAY REGISTER 


818 


001 144 


177560 


$ TKS * 


1 77560 






jjTTY KBD STATUS 


819 


001 146 


177562 


STKB: 


177562 






jjTTY KBD BUFPER 


820 


001 150 


177564 


$TPSS 


177564 






JJTTY PRINTER STATUS REG. ADDRESS 


821 


001152 


177566 


$TPBJ 


177566 






j;TTY PRINTER BUFFER REG, ADDRESS 


822 


001 154 


000 


SNULLS 


.BYTE 







jjCONTAINS NULL CHARACTER FOR r ILLS 


823 


001 155 


002 


SFILLS; 


• BYTE 


2 




JjCONTAINS # OF FILLER CHARACTERS REQUIRED 


824 


001 156 


012 


$f IllC; 


.BYTE 


1 2 




J J INSERT FILL CHARS. Ar TER A "LINE rttu" 


825 


001 157 


000 


STPFLG? 


E_ \i' rn _h 

» P X i & 







JJ M TERMINAL AVAILABLE" r LAG ( BIT <07>s0=YES j 


826 


001 1 60 


OOOOOO 


$REGAD 5 


. WORD 







JjCONTAINS THE ADDRESS r ROM 


827 














jjWHICH (SREGO) WAS OBTAINED 


828 


001 162 


OOOOOO 


sreqos 


.WORD 







JjCONTAINS ( ($REGAD)+0) 


829 


001 164 


OOOOOO 


$REG1 S 


. WORD 







J J CONTAINS C($REGAD)+2) 


83Q 


001 166 


OOOOOO 


SREG2 ; 


. WORD 







JjCONTAINS ((SREGADJ+4) 


831 


001 170 


oooooo 


SREG35 


.WORD 







J JCONTAINS ( ( SREGAD ) +6 ) 


832 


001172 


oooooo 


SREG4: 


• WORD 







j ; contains cc$regad)+io) 


833 


001174 


oooooo 


$REG5S 


. WORD 







jjCONTAINS (C$REGAD)+12) 


834 


001176 


oooooo 


$ REG6 ! 


.WORD 







JjCONTAINS ((SREGADH14) 


835 


001200 


oooooo 


SREG7: 


.WORD 







J J CONTAINS (($PEGAD) + 16) 


836 


001202 


oooooo 


SREG105 


.WORD 







jjCONTAINS ( ( SREGAD) +20 ) 


837 


001204 


oooooo 


$REGli: 


.WORD 







j jCONTAINS (($REGAD)+22) 


838 


001206 


oooooo 


SREG12: 


.WORD 







j j CONTAINS C($R£GAD)+24) 


839 


001210 


oooooo 


$ REG 13* 


.WORD 







j JCONTAINS ( ($REGAD)+26) 


840 


001212 


oooooo 


$REG14; 


.WORD 







J JCONTAINS ( ($REGAD)+30) 


841 


001214 


oooooo 


SREG155 


. WORD 







j j CONTAINS C($REGAD)+32) 


842 


001216 


oooooo 


SREG165 


.WORD 







J JCONTAINS C($REGAD) + 34) 


843 


001220 


oooooo 


SREG17 ? 


.WORD 







J JCONTAINS l($REGAD) + 36) 


844 


001222 


oooooo 


SREG20; 


• WORD 







JjCONTAINS ( ($REGAD)+40) 
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J.46 


001224 
001226 


000000 
000000 




SREG21S 
SREG22: 


« WORD 
.WORD 


_____ 







; {CONTAINS C($REGAD)+42) 
; ; CONTAINS ( ( $REGAD) +44) 
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001230 

J0M11L 


000000 
000000 




SREG23: 
STMPOs 


.WORD 
. WORD 






— 




?;CONTAINS ( C SREGAD) +46 ) 
J ; USER DEFINED 




849 
150 


001234 
Q01236 


000000 




STMpl : 
STMP2: 


.WORD 
-WORD 










JJUSER 
;jUSER 


DEFINED 
DEFINED 




851 
852 


001240 
001 242 


000000 
000000 




$TMP3: 
$TMP4: 


. WORD 
.WORD 










? jUSER 
; :USER 


DEFINED 
DEFINED 




853 


001244 
001246 


000000 
000000 




$TMP5S 
STMP6 : 


,WORD 
.WORD 










; j USER 
? ;USER 


DEFINED 
DEFINED 




855 
856 


001250 
001252 


000000 
000000 




$TMP7 • 
STMP10: 


.WORD 
.WORD 










? JUSER 
j : USER 


DEFINED 
DEFINED 




857 
858 


001254 
001256 


000000 
000000 




SWtl S 
STMP12; 


.WORD 
. WORD 










t JUSER 
; f USER 


DEFINED 
DEFINED 




859 
960 


001260 
001262 


000000 
000000 




STMP135 
STMP14! 


.WORD 
.WORD 










f ?USER 
; jUSER 


DEFINED 
DEFINED 




861 
862 


001264 
001266 


000000 
000000 




$TMP15; 
STMP16? 


.WORD 
.WORD 










? ;USER 

? ?USER 


DEFINED 

DEFINED 




863 
864 


001270 
001272 


000000 

oooooo 




STMP17: 

STMP20: 


# WORD 
.WORD 










t ?USER 
? ;USER 


DEFINED 
DEFINED 




865 
866 


001274 
001276 


000000 

oooooo 




STMP2 t • 
$TMP22 5 


.WORD 
.WORD 










? ?USER 
??USER 


DEFINED 
DEFINED 




867 

868 


001300 
001302 


oooooo 
oooooo 




$TMP23 5 
STINES: 


.WORD 










; jUSER 
? ; MAX. 


DEFINED 

NUMBER OF ITERATIONS 




869 
870 


001304 
001306 


oooooo 

177607 


000377 


$ESCAPEJ0 
$BELL; .ASCl£ 


?? ESCAPE ON ERROR ADDRESS 
<207><377><377> ??CODE FOR BELL 




871 

872 


001312 
001313 


077 
015 




$QUESs 
SCRLF: 


.ASCII 
.ASCII 


/?/ 
<15> 






j * t QUESTION MARK 
? jCARRIAGE RETURN 




873 
874 


001314 


000012 




SliFj .ASCIZ <12> J ? LINE FEED 

j ; ########*#**##♦##*#*#############*##♦#*##**#####**#**# #######*# 




875 
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APT MAILBQX-ETABLE 
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? 

.EVEN 




879 
8 80 


001316 
001316 


oooooo 




$mail: 

$MSGTY! 


.WORD 


AMSGTY 






'APT MAILBOX 
1 MESSAGE TYPE 


CODE 




881 
882 


001320 
001322 


oooooo 
oooooo 




$FATALs 

stestn: 


.WORD 
.WORD 


AFATAL 
ATESTN 






•FATAL ERROR 
•TEST NUMBER 


NUMBER 




883 
884 


001324 
001326 


oooooo 
oooooo 




spass; 

SDEVCT: 


. WORD 
.WORD 


APASS 

ADEVCT 






[PASS COUNT 
'DEVICE COUNT 


885 
886 


001330 
001332 


oooooo 
oooooo 




$UNITj 
$MSGAD: 


.WORD 
.WORD 


AUNIT 
AMSGAD 






•I/O UNIT NUMBER 
•MESSAGE ADDRESS 


887 
888 


001334 
001336 


oooooo 




SMSGLG; 
SETABLE; 


.WORD 


AMSGLG 






MESSAGE LENGTH 
•APT ENVIRONMENT TABLE 


889 
89Q__. 


001336 
001337 


000 
000 




$ENV; 
SENVMS 


.BYTE 
.BYTE 


AENV 
AENVM 






; ENVIRONMENT 
^ENVIRONMENT 


BYTE 

MODE BITS 




891 
89? 


001340 
001342 


oooooo 
oooooo 




SSWREG: 
SUSWR; 


.WORD 

.WORD 


ASWREG 
AUSWR 


J 




r APT SWITCH REGISTER 
! USER SWITCHES 


893 
894 


001344 


oooooo 




$CPUOP; 
?* 


♦ WORD 


ACPUOP 


• ■ 

BJ 


•CPU TYPE, OPTIONS 
tTS 15-11=CPU TYPE 


895 
896 








* * 

* * 

...... ..j r 










11/04= 
11/70=: 


01* 11/05=02,11/20=03,11/40=04, 11/45=05 
0b,PDQ=O7, Q=10 
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BIT lOsREAL TIME CLOCK 

BIT 9=FL0ATING POINT PROCESSOR 




899 
9ftn 


001346 


000 




* # 

SMAMSl! 


.BYTE 


AMAMS1 


BIT 8=MEM0RY 
f ; HIGH ADDRESS 


MANAGEMENT 
,M.S. BYTE 
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q a a ucrr pf"iRF — Art 1 


904 




~ 


J* 






■JAA HCrr ftTDnr.AD'-AAO 




„ 




?* 
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001 352 


AAA 

000 


SMAMS2 * 


• BYTE 


A Li ft tf C? O 




909 


A A 4 K3 

001 35 J 


AAA 

000 


$MT¥P2* 


.BYTE 


«" 1 * r Z 


• • MCM TVOIT RT (f 4t 


..£i Q„ 


001 354 


*\ ji\ A A /V 

000000 


$M ADR2 S 


.^ORD 


AMADR2 


• 4k lui cp u t n c ^f* ji f \ ij £• s2 C u 1 it *♦ "~i 

JJWLW.liAST APUriloo f oiil\f 2 


911 


A A 4 It £ 

001 356 


AAA 

000 


ft . m kit M *\ A 

$MAM53 ? 


• BYTE 




*?HIGH ADDHbob f M • « 1 1 E 


912 


001 357 


AAA 

000 


SMTYP3: 


t BYTE 


AMTYP3 


f ;^E^.TlPEfBLilv#J 


913 


A A 4 ~3 £L f\ 

001 360 


A A AAA A 

000000 


$MADR3 5 


» WORD 


AMAUKJ 


. , M c U I ACT ItnnDCCC or v« 1 


914 


001 362 


000 


$HAMS4 S 


# BYTE 


AWAH54 


* J HIGH ADDRESS f W.O.DJf Ifc 


9t5 


001 36 J 


AAA 

000 


$mt ¥P4: 


#BYTE 


AHTYP4 




916 


001 364 


A A A A A A 

000000 


$MADR4 $ 


.WORD 


AMADR4 


JJwEW.LAST ADDRESSf oLKS 4 


917 


A A 4 3 £ £. 

001 i66 


A A A A A A 

000000 


$ VE.CTI ; 


. WORD 


i\ wet* >*r * 
A VtC I 1 


< • TMTPDD1IDT \l CP TriD * 4 QIIC DBTHDTf V*1 

f J 1 W 1 tKKUr 1 ytliUHf If dUq rKiUKl 1 if 1 


918 


A A 4 1 ^ A 

001 370 


A A A A A A 

000000 
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T 7 Ml 

.WORD 


A V fcC ' 2 


• ■ THTCDDftBT VcTTriD « ODIIC DDTflOTTVil 

•ilwfbKKUPl Vc.5,. 1 UHf 40U0 rHlUHLllwd 
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# WORD 
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ft ^ A 
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000000 


SDEVMS 


♦ ftORP 


AUL VM 
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a 4 
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a a * n 


A A A A A A 

O0O000 


$CDw 1 * 


, WORD 


HWUn 1 


• trnwTDnt i co nr^rPTDTTnw y non * i 


a a 

922 


A A 4 Jk A A 

001 4 00 


000000 


$CDw2 5 


. WORD 


A f* t\ uJ *S 


• i^flMf Dflf I t'D HlTQPDTDTTnM bi fl D n 11 O 
" * ^ UN 1 WUbli&K UtOCKirl xUN nUKU # / 


9* i 




A A A A A A 


$DD#0 ; 


. WORD 


a y A 
AUUnv 


•JL/kVALlL, Utov.Klrl.UK «UKUf U 


924 


A A 4 A A 
001 *04 


A A A A A A 

000000 


SDDWl : 


• WORD 


iv r\ r\ !»j 4 


JJUErVILc* DtLSLKJrlUK WUKUffl 




A A 1 dAf, 


AAA AAA 




. WUKU 


HuUn £ 


• • HPVTfF niTCPR T PTflR wnRni'^ 

J J ytVil-Ci UDj3V.n4r lUn *» U f ff * 


926 


001 41 


A A A A A A 

000000 


$DDW3 • 


.WORD 


ADD^ i 


» • ncu rrc rMrcPDTDTnp unonii 
|?PE"iv& UtovKlr 1UK WUKU* j 


9*7 
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000000 


SDDW4; 


,V*0RD 


n rtrt y A 
A wPW** 


JJPEVlt»,Bi Ufc,SC,Kj,r AUK wUKUff^ 


928 


A i\ 4 A 4 A 

001414 


000000 


$DDW5: 


.WORD 


APDW5 


JJDEVJLCE DESCRIPTOR WORDfS 


Old 

929 


A A 4 A 4 £ 
001410 


A A A A A A 

000000 


$DDW6? 


.WORD 
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001420 


000000 


$DDW7: 
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ADDW7 


••DEVICE DESCRIrluK WUKDI / 


931 
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.WORD 
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,W0RD 


ADDW9 


;;pEViCE DESCRIPTOR W0RD#y 


933 


001426 


000000 


$DD^10S 


, WORD 


ADDW10 


; ;DEV1CE DESCRIPTOR WORD#10 


934 


001430 


000000 


SDDWHS 


.WORD 


ADDW11 


; ; DEVICE DESCRIPTOR W0RDI11 


935 


001432 


000000 


SDDW12; 


.WORD 


ADDW12 


??DEVICE DESCRIPTOR W0RDI12 


936 


001434 


000000 


$DDW 13? 


• WORD 


ADDW13 


?;DEVICE DESCRIPTOR WORDfH 


937 


001436 


000000 


$DDW14? 


.WORD 


ADDW14 


^DEVICE DESCRIPTOR W0RD#14 


938 


001440 


000000 


SDDN15S 


.WORD 


ADDW15 


?;DEVICE DESCRIPTOR W0RDI15 
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001442 
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944 



. SBTTL ERROR POINTER TABLE 



945 
946 



947 



J*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR, 

;«THE INFORMATION IS OBTAI NED BX USING THE INDEX NUMBER FOUND IN 

J»LOCATION SITEMB, THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINENT . 



7tO 

949 










;#NQTE2: 


EI^CH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS # 


Q A 














7 J J 










• # CM 


• s POINTS TO THE ERROR MESSAGE 














• • PnT NT<? TH THF DATA HF ADFR 


? JJ 










t W U J. 


••POINTS TO THE DATA 












• a nir 


• •PflTNTS TH THF DATA FORMAT 
j j r uin i o iu Jtnci uhih r ui\hhi 
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001442 








SERRTB : 
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• T TSTM 1 
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OA 1442 
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037660 
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070540 


WORD 


EMI . DH1 . DTI . DEI 
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A A 4 AC A 
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A ^ 77 1 9 
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WORD 
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001462 
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066216 


070540 
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EM3, DH3,DT3 # DF3 
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978 
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• TTfTM 1 A 
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070012 
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066216 
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.WORD 
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00157.0. 


070012 
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001600 


070012 
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4 1 

1 7 
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. WUKD 


C ivA 4 "7 rtti4*7 nT1*7 nF1 1 
E«Wl / fUHl I f V I 1 f f Uf 1 1 




10.02 


_ .001.630 


070042 












f 
1 


1003 
1004 
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1009 
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070726 




.WORD 
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070105 
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003240 
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050625 


066216 
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003250 


070105 
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003252 


050772 
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066216 
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066216 
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J ITEM 
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055224 
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066557 


071142 
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— — 
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% ITEM 
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003400 
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; ITEM 
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056237 
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J ITEM 
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.WORD 
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1335 


003420 
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5 ITEM 
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1338 


003422 
003430 


056435 
070317 


066557 


071142 




.WORD 


EM177,DH177,DT177,DF177 






1 


1339 

1340 003432 056520 


066557 071142 


? ITEM 


200 

. WORD 


EM200,DH200,DT200,DF200 




1 


C 


1341 
1342 


003440 


070317 






? ITEM 


201 






( 




1343 
1344 


003442 
003450 


056552 
070317 


066557 


071142 




. WORD 


EM201*PH20l*DT201fDF201 






1 


1345 
1346 


003452 


056641 


066557 


071142 


? ITEM 


202 

.WORD 


EM202,DH202,DT202,DF202 
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1 


1347 
134? 


003460 


070317 






J ITEM 


203 










1349 


003462 
003470 


057003 
070317 


066557 


071142 




.WORD 


EM203,DH20 3 f DT203, DF203 
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1 


1351 
135? 


003472 


0571 45 


066557 


071 142 


? ITEM 


204 

.WORD 


EM204,DH204,DT204,DF204 




1 


1 


1353 
1354 


003500 


070317 






; ITEM 


205 






• 




1355 

1356 


003502 
003510 


057233 
07031 7 


066557 


071142 




. WORD 


EM205 f DH205 f DT205f DF205 






1 


1357 
1 358 


00351 2 


A E* 'Tf it A 4 

057401 


066557 


071142 


? ITEM 


206 
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.WORD 


EM206,bH206,DT206,DF206 
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1 


1359 
1 360 


003520 


070317 






J ITEM 


207 






t 




1361 
1362 


003522 
003530 


057547 
070361 


066716 


071252 




.WORD 


EM207,DH207,DT207,DF207 






V 


1363 
1 364 


003532 


05761 1 


067006 


071230 


; ITEM 


210 

. WORD 


EM210,DH210,DT210,DF210 




t 


1 


1365 

_„ 1.16,6..., 


003540 


070351 






? ITEM 


211 






i 




1367 
1 368 


003542 
003550 


057653 
070361 


067006 


071252 




.WORD 


EM21 1 , DH21 1 r DT21 1 , DF21 1 








1369 
1370 


003552 


A £. A A A 

060017 


0667 16 


071 324 


f ITEM 


212 

. WORD 


EM212.DH212* DT21?,DF212 




f 




1371 
1372 


003560 


070405 






} ITEM 


213 






C 




1373 
1374 


003562 
003570 


060203 
070405 


066716 


071324 




.WORD 


EM213, DH2l3 # DT2l3,DF21 3 








1375 
1376 


003572 
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066716 


071 324 


? ITEM 
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EM214,DH2l4,DT214 f DF214 
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1377 
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003600 


070405 






J ITEM 
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1379 
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003610 


060553 
070405 


066716 


071324 
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EM215 f DH215 f DT2l5fDF2l5 








1381 
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003612 


060737 


067006 


071252 


? ITEM 


216 
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EM2l6,DH2l6,DT216 f DF216 
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c 


1383 
1384 


003620 


070361 






; ITEM 


217 
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1385 
1386 


003622 
003630 


061121 
070435 


067047 


071406 




. WORD 


EM2l7,DH2l7 f DT217 # DF217 
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1387 
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003640 
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Em22!#Dh221#DT221#DF221 


i 


1 
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003650 


070361 














1393 










? ITEM 


222 








1394 


003652 


061657 


066656 


071252 




, WORD 


EM222,DH222f DT222,DF222 




1 


1395 
1396 


003660 


070361 






5 ITEM 


223 








1397 


003662 


062110 


067006 


071252 




.WORD 


EM223,DH223,DT223,DF223 


< 


1 


1398 


003670 


070361 














1399 










?ITEM 


224 








140Q 


003672 


062355 


066656 


071252 




.WORD 


EM224,DH224,DT224,DF224 




« 


1401 
1402 


003700 


070361 
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225 




< 


i 


1403 


003702 


062606 


067006 


071252 




.WORD 


EM225, DH225, DT225, DF225 




1404 


003710 


070361 












J! 
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1405 
1406 


003712 


063053 


— — 

067122 




071324 


: ITEM 


226 

.WORD 


EM226, DH226, DT226#DF226 




f 


1407 
1408 


003720 


070405 






? ITEM 


227 




i 




1409 


003722 


063206 


06721 1 


071324 




. WORD 


EM227 f DH227, DT227, DF227 




1 


1410 


003730 


070405 












i 




1411 
1412 


003732 


063341 


067122 


071324 


? item 


230 

.WORD 


EM230 # DH230, DT230 f DF230 




c 


1413 
1414 


003740 


070405 






J ITEM 


231 




I 




1415 


003742 


063475 


06721 1 


071 230 




.WORD 


EM23 1 # DH231 f DT231#Dr231 




4 


1416 


003750 


070405 












t 




1417 
1418 


003752 


0576U 


067211 


071252 


* ITEM 


232 

.WORD 


EM232, DH232, DT232,DF232 




f 


1419 
1420 


003760 


070405 






; ITEM 


233 




I 




1421 


003762 


063631 


067300 


071426 




.WORD 


EM233fDH233|DT233fDr23J 




4 


1422 


003770 


070444 












i 




1423 
1424 


003772 


063670 


067341 


071462 


? ITEM 


234 

.WORD 


_ — _ 

EM234,DH234 f DT234, DF234 




1 


1425 
1426 


004000 


070461 






* ITEM 


235 




€ 




1427 


004002 


063754 


067427 


071502 




.WORD 


EM235, DH235, DT235, DF235 




1 


1429 


004010 


07Q470 












t 




1429 
1430 


004012 


064022 


067467 


071462 


; ITEM 


236 

.WORD 


EM2 36,DH236,DT236,DF236 




< 


1431 
1432 


004020 


070461 






: ITEM 


237 




« 




1433 


004022 


064055 


067341 


071462 




.WORD 


EM237,DH237 f DT237 f DF237 




€ 


1434 


004030 


070461 




■ .. , .. ... 
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1435 






. 




; ITEM 


240 


..... 






1436 


004032 


064141 


067555 


071462 




.WORD 


EM240.DH240,DT24Q f DF240 




i 


1437 


004040 


070461 






J ITEM 


241 




i 




1439 


004042 


064175 


067300 


071426 




.WORD 
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EM241 # DH241 , DT241 , DF241 




€ 


1440 


004050 


070444 












A 

t 




1441 










J ITEM 


242 








1442 


004052 


064300 


067555 


071462 




.WORD 


EM242,DH242,DT242,DF242 
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1443 
1444 


004060 


070461 
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243 




« 


1 


1445 


004062 


064334 


067300 


071426 
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004072 
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ui n o r\ 
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14 49 
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004100 


A 1 A A A A 

/ 0444 
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1450 










; ITEM 
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245 
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1452 


00411 
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070444 
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1454 


0041 1 2 
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06621 6 
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070726 


; ITEM 


246 
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1455 


004120 


070105 












4 4 1? 
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; ITEM 
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24 7 




1 457 


004122 


064560 
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1 458 


0041 30 


070474 












1459 










? ITEM 


A C A 

250 
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1460 


004132 


06461 4 
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1461 
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0041 40 
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J ITEM 


a e 4 

251 
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004 1 42 
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0/134/ 
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004150 


070474 
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004160 
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— — . — , , 
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A C C 
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1476 
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J ITEM 


256 
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060 / 1 
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? ITEM 
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,nUKU 


C» M 1 K A DUOkA n T *> K A n 17 O fc A 
t,M/04#Prt/O4/Pl/04#Pr / 04 
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S ITEM 
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1499 


004302 


066030 


066216 


071556 
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EM265, DH265 f DT265 f DF265 
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00431Q 


070506 
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? ITEM 
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071544 
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i 
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1 
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?HO0KS REQUIRED 
$.5VPCs. 


BY ACT11 

J SAVE PC 
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1511 
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000046 


000046 
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SENDAD 


:mSET LUC. 46 TO ADDRESS OF $ENDAD IN . 


$EOP 
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1513 
1514 


000052 


000052 
000000 







.s52 

.WORD 


; ?2)SET LOC.52 TO ZERO 


< 


i 


1515 
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004322 
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. SBTTL APT PARAMETER BLOCK 
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1517 
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1519 
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i 


< 


1521 
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004322 
000024 
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JJSAVE CURRENT LOCATION 

jjSET POWER FAIL TO POINT TO START OF PROGRAM 


c 




1523 
1524 


000024 


000200 
000044 






200 
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;jFOR APT START UP 

jfPOINT TO APT INDIRECT ADDRESS PNTR. 






t 


1525 
1526 


000044 


004322 
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$APTHDR 
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jjPOINT TO APT HEADER BLOCK 
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fl 


C 
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i 


1531 
1532 


004322 
004322 
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SHIBTS: .WORD 


jjTWO HIGH BITS OF 18 BIT MAILBOX ADDR. 




c 


« 


1533 
1534 


004324 
004326 


001316 
000010 






SMBADRz .WORD 
$TSTM5 .WORD 


SNAIL ; j ADDRESS OF APT MAILBOX (BITS 0-15) 
10 MRUN TIM OF LONGEST TEST 
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1535 
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004330 
004332 


000040 
000000 






$PASTM: .WORD 
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40 J?RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK 
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VERIFY) 
ADDITIONAL UNIT 




i 
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004334 
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f 


1539 
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; sCLEAR THE COMMON TAGS ($CMTAG) AREA 






€ 


1543 
1544 


004336 
004342 


012706 
005026 


001100 




NOV 
CLR 


#$CMTAG#R6 ; ; FIRST LOCATION TO BE CLEARED 
(R6)+ j ? CLEAR MEMORY LOCATION 


€ 


4 


1545 
1546 


004344 
004350 


022706 
001 374 


001140 




CMP 
BNE 


#SWR,R6 J ; DONE? 

.-6 ;?LOOP BACK IF NO 




4 




1547 

*5_4a,_ 


004352 


012706 


001100 




MOV 

::INITIALIZE A 


#STACK,SP ?;SETUP THE STACK POINTER 
FEW VECTORS 






< 


1549 
1550 


004356 
004364 


012737 
012737 


033442 
000340 


000020 
000022 


MOV 
MOV 


#$SCOPE,e#IOTVEC : :I0T VECTOR FOR SCOPE ROUTINE 
#340,$#IOTVEC+2 t ; LEVEL 7 




C 


( 


1551 
1552 


004372 
004400 


012737 
012737 


033722 
000340 


000030 
000032 


MOV 
MOV 


#$ERRQR,&#EMTVEC J ? EMT VECTOR FOR ERROR ROUTINE 
#340, £«EMTVEC + 2 -LEVEL 7 




< 




1553 
1554 


004406 
004414 


012737 
012737 


035670 
000340 


000034 
000036 


MOV 
MOV 


#$TRAP,$#TRAPVEC ;;TRAP VECTOR FOR TRAP CALLS 
#340,##TRAPVEC+2?LEVEL 7 






1 


1555 
1556 


004422 
004430 


012737 
012737 


035754 
000340 


000024 
000026 


MOV 
MOV 


#$PWRDN p e#PWRVEC ;?PQWER FAILURE VECTOR 
#340,g>#PWRVEC + 2 j : LEVEL 7 




C 


1 


1557 
1558 


004436 
004444 


016767 
005067 


026542 
174632 


026532 


MOV 
CLR 


$ENDCT,$EOPCT ?, 'SETUP END -OF -PROGRAM COUNTER 

STIMES J ; INITIALIZE NUMBER OF ITERATIONS 




t 



MAINPE C- U-DFF PB-A POP 11/ 3 4 FPF DIAGNOSTIC PART 2 MACYll 27(l00t>) 07-FEB-77 1 2:06 PAGE 30 

H] DFFpBA.Pl 1 Ot-NOV-76 21 : 6 INITIALIZE THE COMMON TAGS 



i 

1 


1559 
1 560 


004450 
004454 


005067 
112767 


174630 

A A A A A 4 

000001 


4 "I A A H '4 
1/4433 




CLP 

MqV8 


SESCAPE 
»1, $ERMAX 


jjCLEAR THE ESCAPE ON ERROR ADDRESS 
J 1 ALLOW ONE ERROR PER TEST 


* 
1 




1561 










??INITIALIZ£ 
j ; THE "END-QF 


THE "T-BIT" TRAP VECTOR. THEN LOAD LOCATION "$RTRN% IN 
•PASS" (SEOP) ROUTINE, WITH A "RTI" OR W RTT" . 




( 


1563 
1564 


004462 
004470 


012737 
0127 37 


033426 

A A A jf A 

000340 


000014 

A A rt. A 4 £L 

000016 




NOV 
MOV 


#$RTRN,i#TBITVEC ? JSET "T" BIT VECTOR TO $RTRN 
#340,i#TBITVEC+2 : ; LEVEL 7 


i 


i 
t 


1565 
1566 


004476 
004504 


012767 
012737 


000002 
004532 


026722 

000010 


— ~— — — 


MOV 
MOV 


tRTI, SRTRN 
#65$,##RESVEC 


??SET SRTRN TO A RTI 
J J TRY TO DO A RTT 


g 
1 




1567 
1568 


004512 
00451 4 


005046 
01 2746 


A A it f A A 

004522 






CLR 
MOV 


~(SP) 

#64$,«<SP) 


; ; DUMMY PS 

;:AND PC 




< 


1569 
1570 


004520 
004522 


000006 
012767 


000006 


026676 


64$; 


RTT 
MOV 


#RTT, $RTRN 


; ? TRY THE RTT 

j ; RTT IS LEGAL— SET SRTRN TO A RTT 


< 




1571 
1572 


004530 
004532 


000402 
062706 


000010 




65$: 


BR 

ADD 


66$ 

#10, SP 


? ; RTT ILLEGAL— CLEAN OFF THE STACK 


4 
1 




1573 
1574 


004536 
004544 


012737 
005067 


000012 
026664 


000010 


66$: 


MOV 
CLR 


f RESV£C + 2,§#RESVEC ; ? RESTORE TRAP CATCHER 
STBIT f J CLEAR W T" BIT SNITCH 




< 


1575 
1576 


004550 
004556 


012767 
012767 


004550 
004556 


174330 

4 *"! A *% A A 

1 74324 




MOV 
MOV 


#,,$LPADR 

#.,$LPERR 


INITIALIZE THE LOOP ADDRESS FOR SCOPE 
? ? SETUP THE ERROR LOOP ADDRESS 


1 


i 


1577 
1578 










; ?SIZE 
; lEQUAL 


FOR A 
TO A 


HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS 
"»1", SETUP FOR A SOFTWARE SWITCH REGISTER, 


g 

1 




1579 
1580 


004564 
004570 


013746 
012737 


000004 
004624 


A A i\. f\. A /i 

000004 




MOV 
MOV 


@#ERRVECf ~(SP) 
#67$, iiERRVEC 


?;SAVE ERROR VECTOR 
??SET UP ERROR VECTOR 




t 


1581 
1582 


004576 
004604 


012767 
012767 


177570 
177570 


174334 

1 74330 




MOV 
MOV 


#PSWR,SWR 

#DD ISP, DISPLAY 


;;SETUP FOR A HARDWARE SWICH REGISTER 
t ; AND A HARDWARE DISPLAY REGISTER 


1 


1 


1583 

4 a m 

1584 


004612 
004620 


022777 
00101 2 


177777 


174320 




CMP 
BNE 


#-1 ,PSWR 

69$ 


j ; TRY TO REFERENCE HARDWARE SWR 
??BRANCH IF NO TIMEOUT TRAP OCCURRED 


g 
1 




1585 
1586 


004622 


000403 








BR 


68$ 


; ; AND THE HARDWARE SWR IS NOT = -1 
; ; BRANCH IF NO TIMEOUT 




t 


1587 
1588 


004624 
004630 


012716 

A A A A A A 

000002 


004632 


- 


67$ S 


MOV 
RTT 


#68$* (SP) 


j j SET UP FOR TRAP RETURN 


« 


4 


1589 
1590 


004632 
004640 


012767 

A J A ^ J? "I 

012767 


000176 
000174 


174300 
174274 


68$: 


MOV 
MOV 


#SWREG,SWR ? JPOlNT TO SOFTWARE SWR 
#DISPREG, DISPLAY 


M 
i 




1591 
15^2 


004646 


012637 


000004 




69$: 


MOV 


CSP)+,@#ERRVEC 


H RESTORE ERROR VECTOR 




€ 


1593 
1 594 


004652 
004656 


005067 
1 32767 


174446 
000200 


4 3 "f A A r ^ 

17 4453 


„ 


CLR 
BITB 


$PASS 

f APTSIZE,$ENVM 


? ; CLEAR PASS COUNT 

; | TEST USER SIZE UNDER APT 


4 


1 


1595 
• to/ 


004664 


001403 
014 767 


001 340 


4 111 jX 

174244 




BEQ 
MOV 


70$ 

#$SWREG#SWR 


; J YES, USE NON-APT SWITCH 
J?N0,USE APT SWITCH REGISTER 


A 
• 




1597 
1598 


004674 








70$: 

.SBTTL 


TYPE 


PROGRAM NAME 






1 


1599 
1600 


004674 


005227 


177777 




j jTifPE 


THE NAME OF THE PROGRAM 
INC #*1 


IF FIRST PASS 
;;FIRST TIME? 


4 


M 
1 


1601 
1602 


004700 
004702 


001055 
0227 37 


033362 


A A A_ A 4 A 

000042 




BNE 
CMP 


71$ 

#$ENDAD, P# 42 


; j BRANCH IF NO 
? ; ACT-tl? 


A 
• 




1603 
1604 


004710 
0047 1 2 


001451 
104401 


004760 






BEQ 
TYPE 


71$ 
,72$ 


? *, BRANCH IF YES 
??TYPE ASCIZ STRING 




< 


1605 

4 £. A rfT 

1 606 


A A A ^ 4 

004 / 1 6 


a a C *f n *t 

0057 37 


a A A A 4 A 

000042 




•SBTTL 


GET VALUE FOR SOFTWARE 
TST @#42 


SWITCH REGISTER 
; ? ARE WE RUNNING UNDER XXDP/ACT? 


4 


1 


1607 
1 608 


004722 

A A J T A J* 

004/24 


001012 
126/27 


4 T il 4 a £a 

174406 


A A A A 4 

000001 




BNE 
CMPB 


73$ 

$ENV # #1 


; ; BRANCH IF YES 

? ; ARE WE RUNNING UNDER APT? 


4 
1 




1609 
1610 


004732 
004734 


001406 
026727 


174200 


000176 




BEQ 
CMP 


73$ 

SWR, ISWREG 


• ? BRANCH IF YES 

J # SOFTWARE SWITCH REG SELECTED? 




€ 


1611 
161? 


004742 
004744 


001005 
lOi-tQS 








BNE 
GTSWR 


74$ 


; ; BRANCH IF NO 

j ; GET SOFT-SWR SETTINGS 


< 


4 


1613 
1614 


004746 
004750 


000403 
112767 


000001 


174156 


73$: 


BR 

M0V8 


74$ 

#l,$AUTOB 


jjSET AUTO-MODE INDICATOR 


1 



MAINPEC-11-DFFPB-A 
DFFP8A.P11 



POP 11/34 FPP DIAGNOSTIC PART 2 M ACX11 27(1006) 07«F£B~77 12:06 PAGE 31 



01-NQV-76 21;06 



GET VALUE FOR SOFTWARE SWITCH REGISTER 



1615 

IMA. 



004756 
004756 



000426 



1617 

1418. 



Q05Q34 



1619 
1620 



1621 



005034 



74$? 

; ; 7 2$ 5 
71$: 



71$ 



J ? GET OVER THE ASCIZ 



BR 

.ASCIZ <CRLF>*DFFP6, FP11-A 11/34 FPP DIAGNOSTIC PART 2#<CRLF> 



LOOPS 



1623 

1624 ! 


f ; 

!#TEST 1 RQUNDSTRUNK TEST 


1625 ; 

1626 ! 


! * 

!* THIS IS A TEST OF THE ROUNDSTRUNK 


1627 J 

1628 J 


I* FLOWS. IN PARTICULAR TWO THINGS ARE TESTED: 
f* FIRST A CONDITION IN WHICH ROUNDING 


1629 J 

1630 ! 


|# RESULTS IN THE NEED FOR RENGRMALIZATIQN * AND 
!* SECOND THE PSW CONDITION CODES N AND 


1631 J 

1632 ! 


'# Z BIT COMMBINATIONS 

» # 


1633 I 





1634 05034 000004 
1635 



TST1S SCOPE 



?RQUND AND MQRMALIZE TEST 



1637 
1638 


005036 






HHl : 








f 


1639 


005036 


104413 






LPERR 




:SET 


UP THE LOOP ON ERROR ADDRESS. 


3>4Q_ 


005040 


012704 


003200 




MOV 


#3200, R4 




J SET FIU f r IV, AND FD { 


1641 


005044 


170104 






LDFPS 


R4 






1642 


005046 


012737 


005066 


001236 


MOV 


*HH2,£#$TMP2 






1643 


005054 


012700 


006616 




MOV 


#HHPO,RO 




J SET ACO OPERAND f 


1644 


005060 


172410 






LDD 


(RO) , ACQ 






1645 


005062 


012700 


006626 




MOV 


#HHP1,R0 




JFSPC 


1646 


005066 


172010 




HH2: 


ADDD 


(RO)»ACO 




; TEST INSTRUCTION i 


1647 


005070 


170205 






STFPS 


R5 




f GET FPS 


1648 


005072 


012700 


006606 




MOV 


#HHDATQ,RO 




; GET THE RESULT 


1649 
1650 


005076 
005100 


174010 
012701 


006636 




STD 
MOV 


ACO, (RO) 
*HHp2,Rl 




f 

J IS IT CORRECT 


1651 


005104 


012702 


000004 




MOV 


# 4, R2 






1652 


0051 10 


022021 




HH3; 


CMP 


(RO)+,(Rl)+ 




I 


1653 


005112 


001415 






BEQ 


HH6 






1654 


005114 


012700 


006606 




MQV 


iHHDATOf RO 




JDIO FLOW GO 


1655 


005120 


012701 


006646 




MOV 


#HHP3,R1 




; FROM STATE 663 | 


1656 


005124 


012702 


000004 




MOV 


#4.R2 




;T0 313 INSTEAD 


1657 


005130 


022021 




HH4 • 


CMP 


(R0)+#(R1)+ 




;QF TO 353 


1658 


.00.5132 


001402 




BEQ 


HH5 




1 


1659 
1660_. 


005134 
00514Q 


000137 
_0 7 7 2.0 5 


005626 


HH5: 


JMP ##HHERO 
SOB R2»HH4 






1661 


005142 


000137 


005674 




JMP 


gftHHERt 




4 


I6$2 


005146 


077W 




HH6: 


$QB 


R 2 1 HH 3 






1663 


005150 


020405 






CMP 


R4 # R5 


JFPS 


CORRECT? 


1664 


005152 


001402 






BEti 


HH7 




€ 


1665 


005154 


000137 


005742 




JMP 


SJIHHEROO 






1666 


















1667 
166H 








jTHIS IS A TEST 
sOF NORMALIZE Tl 


OF THE ABILITY 
1 PRODUCE A ZERO 


EXP. 


1 

AND 



1669 
±670 



jOF THE P\T ALGORITHM TO PORPCRLY SET THE FPS 



MAINDEC 


-1 1-0FFP6-A 


POP 11/34 FPP 


DIAGNOSTIC PART 2 


MAC Y 1 1 27(1006) 


07- 


FEB 


^77 12S06 PAGE 32 




DFFPBA.Pl 1 01 


•N0V-76 

— — — — — ■ 


21 S06 




Tl 


ROUNDNTRUNK TEST 








" ~ " - 


1671 

1672 


005160 
005160 


104413 






HH7: 


LPERR 




• SET 


UP 


THE LOOP ON ERROR ADDRESS » 




1673 
1 674 


005162 


012704 


043200 






MOV 


#043200, R4 






; SET FIU,FIVfAND FD 
JFID 




1675 
1676 


005166 
0051 70 


___ 
012737 


A A A * £ 

JLft5216 


A A 4 -X £ 

001 236 


_____ — 

- 


MOV 


LDFPS R4 
#HH8, @#$TMP2 






;IN CASE UNDERFLOW 




1677 
1678 


005176 

A A. P *\ A A 

005204 


012737 
012700 


006536 
006666 


000244 




MOV 

MOV 


#HHTRAP,§#FPVECT 
#HHP5, RO 






; TRAP OCCURS 
JSET ACO OPERAND 




1679 
1680 


005210 
005212 


172410 

A 1 ^1 *7 A A 

12700 


006676 






LDD 

mm i*% HF 

MOV 


CRO), ACO 
IHHP6, RO 






jFSPC 




1681 
1682 


005216 
005220 


172010 

m mm A. A a f 

1 70205 






HH8i 


ADDD 
STFPS 


CRO), ACO 

R5 






*1E8T INSTRUCTION 
f GET FPS 




1683 
1684 


005222 
005226 


012700 
1 74010 


006606 






MOV 
STD 


IHHDATO, RO 
ACO, (RO ) 






J GET THE RESULT 




1685 
1686 


005230 
005234 


012701 
012702 


006656 
000004 






MOV 
MOV 


#HHP4,R1 
#4, R2 






JIS IT CORRECT 




1687 
1688 


005240 
005242 


022021 

A A <t *t A <*% 

001402 






HH9 : 


CMP 
BEQ 


(R0) + , (Pi )♦ 

HHl 










1689 
1690 


005244 
005250 


000137 
077205 


006010 




HHl : 


JMP 
SOB 


§#HHER2 
R2,HH9 










1691 

1692 


005252 
005256 


052704 

A, *"k A A a ff 

020405 


100004 






BIS 

CMP 


#100004, R4 
R4,R5 






fFPS CORRECT? 




1693 
1694 


005260 

a * mm f a 

005262 


001402 

A A A 4 ^ *f 

0001 37 


006056 






BEQ 
JMP 


HHll 
§*#HHER3 










1695 
1696 










; THIS IS A TEST 
,»A8ILIT¥ TO SET 


OF THE R\T ALGORITHM 
BOTH H AMD Z ON A * 


RESULT, 




1697 
1698 


005266 
005266 


104413 






HHll! 


LPERR 




;SET 


UP 


THE LOOP ON ERROR ADDRESS „ 




1699 
1700 


005270 


012704 


043200 






MOV 


#043200, R4 






?SET FIV, FIV, AND FD 




1701 
1702 


005274 
005276 


170104 
01 2737 


005316 


A A 4 A, £1 

001236 




LDFPS 

MOV 


R4 

#HH12#3#$TMP2 










1703 
1 704 


005304 
005310 


012700 
172410 


006716 






MOV 
LDD 


#HHP8,R0 
(R0),AC0 






;SET ACO OPERAND 




1705 
1706 


005312 

A A £ 11 4 tL 

005316 


012700 
17*010 


006726 




HH12: 


MOV 
ADDD 


#HHP9,R0 
(R0),AC0 






;FSPC 

; TEST INSTRUCTION 




1707 
1708 


005320 
005322 


170205 
01 2700 


A A £-. A £. 

006606 






STFPS 
MOV 


R5 

#HHDATO,R0 






? GET FPS 

;GET THE RESULT 




1709 
! 710 


005326 

A A C 1 ~i a 

005330 


174010 

A 1 *% T A 4 

012701 


A A *7 A t" 

006706 






STD 
MOV 


ACO, (RO) 
#HHP7,R1 






;IS IT CORRECT 




1711 
1712 


005334 
005340 


012702 

A f\ ^ A 4 

022021 


000004 




HHl 3 S 


MOV 
CMP 


#4,R2 

(R0)+#CR1)+ 










1713 
1714 


005342 
005344 


001415 
012700 


006606 






BEQ 
MOV 


HH16 

iHHDATO.RO 










1715 
1716 


005350 

a a c *i e 4 

005354 


012701 
01 2702 


006656 
000004 






MOV 
MOV 


#HHP4,R1 
#4,R2 










1717 
1718 


005360 
005362 


022021 

A A 4 A A 

001402 






HH14: 


CMP 
BEQ 


(R0)+, (Rl)+ 
HH15 










1719 
1 720 


005364 

A A C "i "» A 

005 j70 


000137 
077205 


006124 




HH15; 


JMP 
SOB 


<a#HHER4 
R2,HH14 










1721 
1722 


005372 
005376 


000137 
077220 


006172 




HH16S 


JMP 
SOB 


e#HHER5 
R2,HH13 










1723 
1724 


005400 
005404 


052704 
020405 


100014 






BIS 
CMP 


#100014, R4 
R4.R5 






JFPS CORRECT? 




1725 
1726 


005406 
005410 


001402 
000137 


0Q6240 






BEQ 
JMP 


HH17 
@#HHER6 











MAINDEC 


-H-OFFPB-A 


PDP 11/34 FPP 


DIAGNOSTIC PART 


2 


MACm 27( 1 00o) 


07- 


FEB 


-77 12J06 PAGE 33 




DFFP8A.P1 1 


01-NOV-76 


21 J06 




Tl 


ROUNPNTRUNK TEST 










1727 
1728 


005414 




— . — 




? TEST 
HH17S 


THAT CC 


ARE CLEARED BY R\T 










1729 

. 0,30.., 


005414 
005416 


104413 
012704 


000200 




„ 


LPERR 
MOV 




#00200, R4 


J SET 


UP 


THE LOOP ON ERROR ADDRESS, 
?SET FIV, FIV, AND FD 




1731 
1732 


005422 
QQ54?4 


170104 
012737 


005452 


001236 




LDFPS 
MOV 




R4 

*BH18,@# STMP2 










1733 
1734 


005432 
005440 


012737 
012700 


036614 
006716 


000244 

— 




MOV 
MOV 




#FPSPUR,0#FPVECT 
#HHp8,R0 






?SET ACO OPERAND 




1735 
1736 


005444 
005446 


172410 
012700 


006716 






LDD 
MOV 




CRO), ACO 
#HHP8 # R0 






;fspc 




1737 
1738 


005452 
005454 


172010 
170205 






HH18; 


ADDD 
STFPS 




CRO), ACO 

R5 






j TEST INSTRUCTION 
? GET FPS 




1739 
1740 


005456 
005462 


012700 
174010 


006606 






MOV 
STD 




#HHDATO,R0 
ACO, CRO) 






J GET THE RESULT 




1741 
1742 


005464 
005470 


012701 
012702 


006736 
000004 






MOV 
MOV 




#HHP10,R1 
#4,R2 






MS IT CORRECT 




1743 
1744 


005474 
005476 


022021 
001402 






HH19S 


CMP 
BEQ 




CR0)+,CRl)+ 

HH20 










1745 
1 746 


005500 
005504 


000137 
077205 


006306 




HH20: 


JMP @#HHER7 
SOB R2,HH19 










1747 
1748 


005506 
005512 


052704 
020405 


000000 






BIS 
CMP 




#00000, R4 
R4,R5 






?FPS CORRECT? 




1749 
1750 


005514 
005516 


001402 
000137 


006354 






BEQ 
JMP 




HH21 

fc#HHER8 










1751 
1752 


005522 








; TEST 
HH21 : 


THAT M 


IS 


SET B* R\T 










1753 
1754 


005522 
005524 


104413 
012704 


003200 




— , — — . — 


LPERR 
MOV 




_ _ 

#3200, R4 


?SET 


UP 


THE LOOP ON ERROR ADDRESS, 
;SET FIV, FIV, AND FD 




1755 
1756 


005530 
00553? 


170104 
012737 


005552 


001236 




LDFPS 
MOV 




R4 

#HH22.@#$TMP2 










1757 
1758 


005540 
005544 


012700 
172410 


006666 






MOV 
LDD 




#HHP5,R0 
CRO), ACO 






;SET ACO OPERAND 




1759 
1760 


005546 
005552 


012700 
172010 


006666 




HH22: 


MOV 
ADDD 




#HHP5,R0 
CRO). ACO 






JFSPC 

J TEST INSTRUCTION 




1761 
176? 


005554 
005556 


170205 
012700 


006606 




— -—-=—-»— 


STFPS 
MOV 




R5 

#HHDATO,P0 






? GET FPS 

• GET THE RESULT 




1763 
1764 


005562 
005564 


174010 
012701 


006746 






STD 
MOV 




ACO, (RO) 
#HHP11 ,R1 






?IS IT CORRECT 




1765 
1766 


005570 
005574 


012702 
022021 


000004 




HH23S 


MOV 
CMP 




#4,R2 

CRO)+,CRl)+ 










1767 
1768 


005576 
005600 


001402 
000137 


006422 






BEQ 
JMP 




HH24 

§ IHHER9 










I769 
1770 


005604 
005606 


077205 
052704 


000010 




HH24 s 


SOB 
BIS 




R 2 , HH 2 3 
#10, R4 










1771 
1772 


005612 
005614 


020405 
001402 









CMP 
BEQ 




R4,R5 

HH25 






?FPS CORRECT? 




1773 
1774 


005616 
005622 


000137 
000137 


006470 
006756 




HH25: 


JMP 
JMP 




@#HHER1 
etHHDQNE 










1775 
1776 


005626 
005626 


010537 


001252 




HHERO? 


MOV 




R5,@#$TMP10 










1777 
1778 


005632 
005636 


010437 
012737 


001254 
006626 


001240 




MOV 
MOV 




R4,i#$TMPll 
#HHPl,<a#$TMP3 










1779 
1780 


005644 
005652 


012737 
012737 


006616 
006606 


001242 
0.M244 




MOV 
MOV 




#HHP0,«#STMP4 
#BHDAT0,§#$TMP5 










1781 
1782 


005660 
005666 


012737 
104207 


006636 


001246 


1$5 


MOV 
ERROR 




#HHP2,»#$TMP6 
207 
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1783 


0056 70 


0001 37 


006756 






JMP 


f__ ii LI u f \ mi D 

w# HHDONE 




1784 


005674 








H.HBR1 S 








1785 


005674 


A A A f ^ ^ 

010537 


001 252 






u r*. \i 

MOV 


R5# PiSTMPl 


. — . . .. _ „ — 


1786 


005700 


010437 


001254 






MQV 


R4, @#$TMP11 




1787 


005704 


012737 


006626 


A A 4 ^ 4 _f\ 

001240 


. — _ 


NOV 


#HHP1 f @#$TMP3 


- - — - - — 


1788 


005712 


012737 


00661 6 


001 242 




MOV 


#HHP0# M$TMp4 




1789 


005720 


012737 


006606 


001 244 




NOV 


iHHDATO, P#$TMP5 


— — _____ — . . ,_„ m , .„ 


1790 


005726 


012737 


006636 


001246 




MOV 


#HHP2f §#STMP6 




1791 


_•___!_'■■ "«% A 

005734 


10421 1 






1$ : 


ERROR 


211 




1792 


005736 


000137 


006756 






JMP 


PiHHDONE 




1793 


005742 








HHER00S 









1794 


005742 


QJ 05.37 „ 


001252 




— 


MOV 


R5t G#$TMP10 




1795 


005746 


010437 


001 254 






MOV 


R4# §#STMP1 1 




1796 


005752 


012737 


006626 


001240 




MQV 


tHHPl, @#$TMP3 




1797 


005760 


012737 


006616 


001242 




MOV 


#HHP0# $#$TMP4 




1798 


005766 


OJ2737 


006606 


001244 




MOV 


#HHDAT0# §# STMP5 




1799 


005774 


012737 


006636 


001246 




MOV 


#HHP2f @# STMP6 


- - 


1800 


006002 


104210 




— . 


IS* 


ERROR 


210 




1801 


006004 


0001 37 


006756 






JMP 


##HHDONE 




1802 


006010 








HHER 2 5 








1 803 


A A __" A 4 A 

006010 


A 4 AC! "7 

010537 


A dl 4 n If A 

001 252 






MOV 


R5#P#$TMP10 




1804 


00601 4 


010437 


001254 






MOV 


R4#@#$TMP11 




1 805 


006020 


012717 


ft A £ /" l Z 

006676 


001240 




MOV 


#HHp6 f @#$TMP3 




1806 


006026 


012737 


006666 


001242 


_____ — 


MOV 


#HHP5 # ##$TMP4 




1807 


A. a £ A a\ 

006034 


012737 


006606 


001 244 




MQV 


# HHDATO i §#$TMP5 


.... .. — ., 


18§8 


006042 


012737 


006656 


001246 




MQV 


#HHP4 # @#$TMp6 




1809 


006050 


104207 






is: 


ERROR 


207 




1810 


006052 


00013 7 


006756 






JMP 


@#HHDONE 




1811 


006056 








HHER 3 5 






. . 


1812 


006056 


010537 


001252 






MOV 


R5, ##$TMP10 




1 8 1 3 


A A £. #\ £L A 

006062 


010437 


A A 4 A C 4 

001254 






MOV 


R4f ##$TMP1 1 




1814 


006066 


012737 


006676 


001240 


: — : 


MOV 


#HHP6 # §#$TMP3 




1815 


0060/4 


012737 


A A _£_ _f __. 

006666 


001242 




MOV 


#HHP5f i#$TMP4 




1816 


006102 


012737 


006606 


001244 




MOV 


# HHDATO, @#$TMP5 




1817 


A A £_ 4 4 A 

0061 10 


01 2737 


006656 


A A 4 A Jt £1 

001 246 




MOV 


#HHP4 f §#$TMP6 




1818 


0061 16 


104214 


— — 




1$; 


ERROR 


214 




1819 


0K 4%. f A A A 

006120 


0001 37 


006756 






JMP 


##HHDONE 




1820 


006124 









HHER4 5 








1821 


006124 


01 0537 


001252 






: 

MOV 


R5 f @# $TMP10 




1822 


006130 


010437 


001254 






MOV 


R4 # §#$TMP1 1 




1823 


A A _£1 4 A 

0061 34 


0127 37 


006726 


001240 




MOV 


#HHp9 ff ##$TMP3 


i 


1824 


006142 


012737 


006716 


001242 




MOV 


#HHP8# P#$TMP4 




1 825 


0061 50 


012737 


006606 


001 244 




MOV 


# HHDATO, P#$TMP5 




1 826 


006156 


012737 


006706 


001246 





MOV 


IHHP7, a#$TMP6 


i 


1827 


006 164 


104207 






1$ S 


ERROR 


207 




1828 


006166 


0001 37 


006756 


— ,, — „„. — 




JMP 


§#HHDONE 




1829 


0061 72 








till f~* Ft r • 

HHER5 ! 






i 


1830 


006172 


010537 


001252 


— — — — 




MQV 


R5, @#$TMP10 




1831 


A A _. 1 "7 

OQo 1 76 


A f A A *i "7 

010447 


001254 






MOV 




, . 


1 832 


A A _£ *\ A 

006202 


A 4 O *f '1 'TP 

012737 


006726 


001 240 




MOV 


#HHP9, G#$TMP3 


i 


1833 


006210 


012737 


006716 


001242 




MQV 


#HHP8,$#$TMP4 




1834 


006216 


012737 


006606 


001244 




MOV 


#HHDATO # ##$TMP5 




1835 


006224 


012737 


006706 


001246 




MOV 


#HHP7,0#$TMP6 


i 


1836 


006232 


104216 






is: 


ERROR 


216 




1837 


006234 


000137 


006756 






JMP 


fS#HHDONE 




1838 


00.6240 








HHER65 






i 
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Ot-NOv-76 


21 S06 




Tl 


RQUND\TRUNK TEST 




1 


1839 
1840 


006240 
006244 


010537 
010437 


001252 
001254 






MQV 
MOV 


RS,§#$TMP!Q 
R4,§#$TMPil 






1841 
1842 


006250 
006256 


012737 
012737 


006726 
006716 


001240 
001242 




mov 

MOV 


#HHP9 f S#$TMP3 
#HHP8,e#STMP4 




< 


1843 
$844 


006264 
006272 


012737 
012737 


006606 
0Q6706 


001244 
001246 




MOV 
MOV 


#HHDATO,§#$TMP5 

#HHP7,£#$TMP6 


_ , — _ . _ 


f 


1845 
1846 


006300 
006302 


104215 
000137 


006756 




1$: 


ERROR 
JMP 


215 

£#HHDQNE 






1847 
1848 


006306 
006306 


010537 


00*252 




HHER7: 


MOV 


R5.@#$TMP10 




1 


1849 
1850 


006312 
006316 


010437 
012737 


001254 
006716 


001240 




MOV 
MOV 


R4, $#$TMPtl 
#HHP8,§#$TMP3 




i 


1851 
1852 


006324 
006332 


012737 
012737 


006716 
006606 


001242 
001244 




MOV 
MOV 


#HHP8 # @#$TMP4 
iHHDATO, e#$TMP5 






1853 
1854 


006340 
006346 


012737 
104207 


006736 


001246 


1$: 


MOV 
ERROR 


#HHP1Q,P#$TMP6 
207 




< 


1855 
1856 


006350 
006354 


000137 


006756 




HHER8 • 


JMP 


PIHHDONE 




I 


1857 
1858 


006354 
006360 


010537 
010437 


001252 
001254 






MOV 
MOV 


R5,@#$TMP10 
R4,##$?MP1! 






1859 
1860 


006364 
006372 


012737 
012737 


006716 
006716 


001240 
001242 




MOV 
MOV 


#HHP8,S#$TMP3 
|HHP8,##$TMP4 




1 


1861 
1862 


006400 
006406 


012737 
012737 


006606 
006736 


001244 
001246 




MOV 
MOV 


#HHDATO,ia#$TNP5 
#HHP10f i#$TMP6 




i 


1863 
1864 


006414 
006416 


104212 
000137 


006756 




1$; 


ERROR 
JMP 


212 

®#HHDON£ 






1865 
1866 


006422 
006422 


010537 


001252 




HHER9 : 


MOV 


R5,§#$TMP10 




c 


1867 

1868 


006426 
006432 


010437 
012737 


001254 
006666 


001240 




MOV 
MOV 


R4,@#$TMP11 
#HHP5 f e#$TMP3 




1 . 


1869 
1870 


006440 
006446 


012737 
012737 


006666 
006606 


001242 
001244 




MOV 
MOV 


#HHP5 # i#$TMP4 
IHHDATO, p#$TMP5 






1871 
1872 


006454 
006462 


012737 
104207 


006746 


001246 


is: 


MOV 
ERROR 


#HHPl 1 , §#$TMP6 
207 




I 


1873 
1874 


006464 
006470 


000137 


006756 


— 

— 


HHCR10S 


JMP 


(MHHDONE 




ft- 

f 


1875 
1876 


006470 
006474 


010537 
010437 


001252 
001254 






MOV 
MOV 


R5 f @#$TMP10 
R4,£#$TMP11 






1877 
1878 


006500 
006506 


012737 
012737 


006666 
006666 


001240 
001242 




MOV 
MOV 


#HHp5 f g#$TMP3 
#HHP5,I»*$TMP4 




t 


1879 
1880 


006514 
006522 


012737 
012737 


006606 
006746 


001244 
001246 




MOV 
MOV 


#HHDATO # §#$TMP5 
#HHP11#£#$TMP6 




I 


1881 
1882 


006530 
._a06532 


104213 
000137 


00615.6. 


— ~— — 


IS? 


ERROR 
JMP 


213 

»#HHDONE 






1883 
1A84 


006536 
006542 


013703 
... 062703 


001236 
000002 




HHTRAP : 


MOV 
ADD 


$#$TMP2,R3 
#2 f R3 


;WAS THE TRAP TO 244 
•ON THE INSTRUCTION 


1 


1885 
1886 


006546 
006550 


020316 
001402 








CMP 
BEQ 


R3 # (SP) 
IS 


; BEING TESTED? 


c 


1887 
1888 


006552 
006556 


000137 
011637 


036614 
001236 




1$: 


JMP 
MOV 


£#FPSPUR 
(SP),$#$TMP2 


; FAILURE OF FPS INTERRUPT 




1889 
1890 


006562 


022626 








CMP 


(SP)+, (SP)+ 


; DISABLE BIT (FID=1 ) 
;T0 INHIBIT TRAP, 




1891 
J892 


006564 
006566 


170201 
010J37 


001240 






STFPS 
MOV 


Rl 

Rl,e#$TMP3 




i 


1893 
1894 


006572 
006574 


170301 
010137 


001242 






STST 


Rl 

R1,$#$TMP4 





MAINDEC 


~ll«DFFP8 


•A 


PDP 11/34 
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PART 2 
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DFFPBA .Pit 01 


•NO V»76 


21 5 06 


T! 


ROUNDNTRUNK TEST 


,,„„„._.„. .,„.„.. _ ,., ,. 




1895 
1896 


006600 
006602 


104217 
000137 


006756 


2$ ; 


ERROR 
JNP 


217 

w # HHDuNE 






1897 
1 898 


006606 
006610 


000000 
000000 




i 1 f f -r\ ft ffi f* . 

HHDATO : 






- ■ - ■— - "■ 


„ „ . , , . 




1899 
190>Q 


006612 000000 
006614 000000 










. — '■ .i'-'— ■■— - 


.,„., „„, 




1901 
1902 


006616 
006620 


000452 
125252 




HHPO : 


452 

1 25252 








1903 

1 904 


006622 
006624 


125252 

125253 






% 3 ^ 3 «S 3 
125253 








1905 
1906 


006626 
006630 


000252 
125252 




HHP1 * 


252 

125252 


— — — — — — — — — — ■— 


„ ,, _.-,■■«„„. 




1907 
1908 


006632 
006634 


125252 
125252 






125252 
1 25252 


, _ „ 






1909 
1910 


006636 
006640 


000600 
000000 




HHP2 ? 


600 






J HHPO + HHP 1 W I in 
?PROPER NORMALIZATION 




1911 

im 


006642 
006644 


000000 
000000 










— , — — _ — _™__» 






1913 
1914 


006646 
006650 


000400 
000000 




fill *fc . 

HHP3 5 


400 





fHHPO + HHP! WITH 
? BAD NORMALIZATION 




1915 
1916 


006652 
006654 


000000 
000000 











— — - — — — - 






1917 
1918 


006656 
006660 


oooooo 

000000 




HHP4 : 












1919 
1920 


006662 
006664 


oooooo 
oooooo 
















1921 
1922 


006666 
006670 


100200 

oooooo 




HHPS ; 


100200 









1923 
1924 


006672 
006674 


oooooo 
oooooo 











— — — 






1925 
1 926 


006676 
006700 


000300 

oooooo 




HHP6 * 


300 









1927 

1928 


006702 
006704 


oooooo 
oooooo 
















1929 
1930 


006706 
006710 


100000 

oooooo 




HHP7 * 


100000 





JtlHP / — nnPo t Hn r " 
= HHPS ♦ HHP6 




1931 
1932 


006712 
006714 


oooooo 
oooooo 

















1933 
1934 


006716 
006720 


000200 

oooooo 




HHP8 : 


200 



■ ■■■ — ■ ■ -— ■ 






1935 
$936 


006722 
006724 


oooooo 
oooooo 
















1937 
1938 


006726 
006730 


100300 

oooooo 




HHP 9 : 


100300 









1939 
1940 


006732 
006734 


oooooo 
oooooo 
















1941 
1942 


006736 000400 
006740 000000 




HHpl o : 


400 





J HHP 1 - HHpo + HHPe 




1943 
1944 


006742 
006744 


oooooo 
oooooo 
















1945 
1946 


006746 
006750 


100400 

oooooo 




hhpi i : 


100400 






•hHPll - HHP5 + HHP5 




1947 
1948 


006752 
006754 


oooooo 
oooooo 
















1949 
1950 


006756 
006756 


104412 




HHDQNE! 


RSETUP 




;G0 INITIALIZE THE EPS AND STACK; AND 
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Tl 



ROUNDVTRUNK TEST 



1951 

JL95JL 



1953 
133± 



jSEE IF THE USER HAS EXPRESSED 
; THE DESIRE TO CHANGE THE SOFTWARE 
jVIRTUAL CONSOLE SWITCH REGISTER (HAS 
y THE USER TYPED CONTROL G? ) . 



1955 



t n e t ■ 

1 957 J 

1958 ! 


\ |#tt*t Itttt t tttttftttttttf tttttttf tt tt 

{♦TEST 2 OVERXUNDER TEST 


1959 I 

1960 ! 


♦ 

t#THlS IS A PARTIAL TEST OF THE OVERXUNDER 


1961 J 

1962 ! 


{♦FLOWS. ONE OVERFLOW AND TWO UNDERFLOW 
{♦CONDITIONS ARE CHECKED. THE REMAINING 


1963 ! 

1964 ! 


'♦UNDERFLOW COND. AND THE REMAINING OVERFLOW 
t ♦COND. WILL 8E CHECKED LATER USING THE 


1965 1 

1966 ! 


{♦XXX INSTRUCTION. HERE EACH CONDITION TESTED 
{♦IS CHECKED BOTH WITH TRAPS ENABLED 


1967 5 

1968 ! 


'♦CFIUsl OR FIVsl ) AND ALSO WITH TRAPS 
{ ♦DISABLED CFIUsO OR FIV«0). 


1969 


'# 



i 



1970 



*#♦###♦#♦##♦♦#*###♦#*♦♦#♦*♦♦♦♦#♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦*♦♦♦* 





a til * 

1971 


006 7o0 


f\ a A a a A 

000004 






TST4 5 


C f* f *l D IT 








1972 


















4 


1973 










; TEST 


OVERFLOW 


CONDITION WITH TRAP DISABLER FIV*0 




1974 


006762 








GG1 ; 










1975 
1976 


006 762 
006764 


104413 
012704 


000200 






T DPDO 

UrtKH 
HO v 


#200, R4 


?SET UP THE LOOP ON ERROR ADDRESS, 
f CLEAR FIU, FIV f AND SET FD 




1977 
1978 


A A £ T A 

006 770 
006772 


4 1 A 1 A A 

012737 


007020 


. — ___ 

001236 




t nrn e 

liPr P5 

MOV 


R4 

#GG2# §t STMP2 




< 


1979 
1980 


007000 
007006 


012737 
012700 


010052 
01 1624 


000244 


, — : — 


NOV 

*1U V 


iGGERO, §#FPvECT 
#GGP5»R0 


;SET ACO OPERAND 


1 


1981 
1982 


007012 
007014 


172410 
012700 


011624 






LDD 
MOV 


(RO) , AGO 
#GGP5,R0 


;FSRC 




1983 


007020 


172010 






GG2; 


ADDD 


(R0),AC0 


; TEST INSTRUCTION 




1934 


007022 


170205 








STFPS 


R5 


? GET FPS 


i 


1985 
1986 


007024 
007030 


012700 
174010 


011554 






MOV 
STD 


#GGDAT0 # R0 
ACO, (RO) 


? GET THE RESULT 




1987 


007032 


012701 


011634 






MOV 


#GGP6,Rt 


J1S IT CORRECT 


4 


1988 


007036 


012702 


000004 






MOV 


#4,R2 






1989 
1990 


007042 
007044 


022021 
001402 






GG3S 


CMP 

BEQ 


(R0)+, CR1 )+ 

GG4 




4 


1991 
J 99? 


007046 
007052 


000137 
077205 


010150 




GG4: 


JMP 
SOB 


@SGGER1 
R2,GG3 




4 


1993 


007054 


052704 


000006 






BIS 


#6, R4 


;FPS CORRECT? 


1994 


007060 


020405 








CMP 


R4,R5 






1995 


007062 


001402 








BEQ 


GG5 






1996 


007064 


000137 


01.0216 






JMP 


G#GGER2 




( 


1997 












? TEST 


OVERFLOW WITH TRAPS ENABLED 




1998 












?fiv = 






( 


1999 
2000 


007070 
007070 


104413 






GG5S 


LPERR 




;SET UP THE LOOP ON ERROR ADDRESS . 




2001 


007072 


012704 


001200 






MOV 


#1200, R4 


; CLEAR FIU, SET F1V, AND FD 




2002 


007076 


170104 








LDFPS 


R4 




4 


2003 


007100 


012737 


007126 


001236 




MOV 


#GG6,£#$TMP2 






2Q04 


PQ7106 


012737 


007144 


000244 




MOV 


«GG7,@#FPVECT 




< 


2005 
2006 


0071 14 
007120 


012700 
172410 


011624 






MOV 
LDD 


#GGP5,R0 
(R0),AC0 


,'SET ACO OPERAND 



4 



c 



1 
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4 

1 


2007 
20§8 


7 1 2 1 
0071 26 


ft « *> TF A A 

4 *1 *1 A 4 A 

172010 


ft 4 ( £<)i 

01 10 2 4 

' ■ 





GG6 $ 


™U v 
ADDD 


/□At 

( HO ) t ACO 


t T D Ir v. 

* 1 tt>0 1 aWOIHUI. i 1UN 


_.. < 




200* 


00 7 I JO 


1 "J A A A A 
1 7 0000 


















2.0 1 


A A ™ * 4 ^ A 

0071 32 


012700 


A 4 4 C C A 

01 1554 






u o \/ 


# GGD ATU f R0 






1 


201 1 
2012 


0071 3t> 
0071 40 


1 7 401 

A A /\ 4 "S ~ f 

0001 37 


A 4 A A jC ii 

010264 


- 




JHP 


AL.0 # I HO J 
p IGGER 3 


. . . . _ _ 


J 
I 


g 


201 3 


007 1 44 


01 i 703 


A A 4 O *5 

001236 




bb 7 * 


Ll f'i 1/ 

MOV 


O K i T 11 B O D"3 

^#5lr f »P2#KJ 


, . ™ , 


1 


2014 


007150 


062703 


A A A A A A 

000002 






ADD 


# 2$ R3 






2015 


007154 


020316 








CNP 


R3 f (SP) 








2016 


007156 


001 402 








n r n 

8EQ 


4 A 

1 $ 






i 


201 7 


007160 


0001 37 


03661 4 






tun 


w # r rSPUK 




J 
1 




2018 


007164 


01 1637 


Q01236 




1 $ : 


MOV 


(SP) # §#$TMP2 


_____________ — : : 




4 

1 


2019 


007170 


022626 








CMP 


CSP)+# (SP)+ 




M 
1 


2020 


007172 


170205 









STFPS 


R5 






2021 
2022 


0071 74 
007200 


01 2700 
174010 


01 1554 






MOV 
STD 


ifThATn DA 

f bbUA 1U» HO 
AC0# C R0 ) 


* bb 1 Inc. KtaUlj I 




1 


2023 


007202 


012701 


011634 






MOV 


#GGP6,R1 


JIS IT CORRECT 


1 




2024 


007206 


012702 


A A A A A Jk 

000004 


— _ 




li ***** t J 

MOV 


# 4# R2 






g 


2025 
2026 


a **• A 4 a 

00721 2 
0072 1 4 


A A *^ A A 4 

022021 

A A 4 4 A 

001 402 






f* f* o • 


CMP 
BEu 


CH0)+^(Rj}+ 




1 




2 0*7 


A A 1 *3 i a 

00 f * 1 o 


ft « a 1 n 
00014 7 


A "1 A U 1 "5 

1 4 J 2 






Tun 

urir 










f\ f\ A 

2028 


007222 


07 '205 






GG9 ; 


50p 


H 2 * bbo 






< 


2029 
2030 


007224 

A A *T *1 1 A 

0072 30 


052704 

A *■} A /i A C 

020 405 


100006 






BIS 
CMP 


#100006, R4 

R4 f K3 


J r r D CUHKbC 1 f 


i 




2031 


007232 


001402 








8EQ 


1$ 






g 


2032 


007234 


A A /\ 4 "v "*? 

0001 37 


A 4 A A A ^ 

010402 






Tun 
JMP 


PIGGER6 




t 




203 3 


00 ' 240 


A 4 HaA 

012704 


A A /t A 4 «\ 

000010 




15! 


MOV 


#10, R4 








2034 










Mil m f% If 

; CHECK 


FEC 








t 


2035 
2036 


007244 
007246 


170305 

AAA Jl r" 

020405 








STST 

CMP 


R5 

R4,R5 




< 


1 


2037 
203» 


007250 
007252 


001402 

A A A 4 **J 

0001 37 


A Jl A ^ Jl 

0103 34 






8EQ 
JMP 


GG10 
PIGGER5 




_r 

* 




2039 










; CHECK 


UNDER FLOW CONDITION WITH 








2040 










JTRAPS 


DISABLED 


CFIU s 0) 






I 


2041 
2042 


007256 
007256 


104413 






GG10! 


LPERR 




? SE r UP THE LOOP ON ERROR ADDRESS* 


I 


1 


2043 
2044 


00 '260 

A A ~ # -*i _I 4 

007264 


A 4 *7 A >l 

012704 

4 *** /\ 4 S\ it 

170104 


A A A A A A 

000200 






MOV 
LDFPS 


#0200, R4 
R4 


• C C T p T II PTU Ik mi ft c ft 

Jotl rlU, riV, APiiJ rU 


* 




2045 


00 / 266 


A 4 OI 1 1 


A AT ■) | >i 

007314 


001 23o 





MOV 


#GG11,P#$TMP2 








2046 


007274 


0127 37 


A 4 A Jl C A 

01 0450 


000244 




MOV 


#GGER7 , §#FPVECT 






€ 


2047 
204§ 


007302 
007306 


012700 
172410 


011574 






MOV 
LDD 


#GGP2,R0 
(R0),AC0 


?SET ACO OPERAND 
; FSRC 


i 




<e04y 


A A "7 1 4 A 

00 f J 1 


A 4 *5 1 A A 

012 / 00 


ft 4 4 ** ft A 

1 1604 






MOV 


#GGP3,R0 






4 


2050 


007314 


4 "1 O A 4 A 

172010 






GG1 1 S 


ADDD 


(R0),AC0 


; TEST INSTRUCTION 


t 




2051 




i 1 A'a acl 








STFPS 


R5 


# be* I r ro 






2052 


007320 


012700 


A 4 4 F C J 

01 1554 






MOV 


#GGDAT0,R0 






1 


20*} i 

2054 


00 1 3 4 1 * 

A A Tf 1 O £. 

00'326 


1 T A A 1 A 

1 7^010 

A 4 OT A 1 

01 2701 


A 4 4 i" it 

011634 






STD 
MQV 


ACO, (R0) 
#GGp6,Rl 


; IS IT CORRECT 


!■ 






a a 7 a i o 
00 f - 3 £ 


012 7 02 


A A A A A A 
000004 






MQV 


#4,R2 








20->6 


00 ' -5 3D 


0/2021 






bb 12 5 


CMP 


CR0)+, (Rl )♦ 




i. 




2057 


007340 


001402 








BEQ 


GG13 








2058 


007342 


000137 


010546 






JMP 


##GGER8 






t 


2059 


007346 


077205 






GG1 3 ! 


SOB 


R2,GG12 




1 




2060 


00735Q 


052704 


Q0Q0Q4 






BIS 


#4.R4 


;FPS CORRECT? 






2061 


007354 


020405 








CMP 


R4,R5 






i 


2JL6_2^ 


00J356 


0014_Q2 








8E0 


GG14 




€ 
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2063 007360 000137 010614 JMP @#GGER9 

2064 . _____ _ , ___ ;CHECK UNDERFLOW CON DITION WITH _ . 

2065 * TRAP ENABLED (FIU a 1) 

2066 007364 GG1 4; 

2067 007364 104413 LPERR ?SET UP THE LOOP ON ERROR ADDRESS, 



2069 


007366 


012704 


002200 






MOV 


#2200, R4 


;SET FIU, FIV, AND FD 


2069 


007372 


170104 








LDFP5 


R4 




2070 


007374 


.012737 


007422 


001236 




MOV 


#GG15,«#$TMP2 




2071 


007402 


012737 


007440 


000244 




MOV 


#GG16,##FPVECT 




207* 


007410 


012700 


011574 






NOV 


#GGP2,R0 


;SET ACO OPERAND 


2073 


007414 


172410 








LDD 


(R0),ACO 


JFSPC 


2074 


007416 


012700 


011604 






MOV 


#GGP3,R0 




2075 


007422 


172010 






GG15; 


ADDD 


(RO) , ACO 


; TEST INSTRUCTION 


2076 


007424 


170000 








CFCC 






2077 


007426 


012700 


011554 






MOV 


#GGDATQ,R0 




2078 


007432 


174010 








STD 


ACO » CRO ) 




2079 


007434 


000137 


010662 






JMP 


##GGER10 






007440 


013703 


001236 




GG165 


MOV 


»#$TMP2,R3 




2081 


007444 


062703 


000002 






ADD 


*2,R3 




2082 


007450 


021603 








CMP 


(SP),E3 




2083 


007452 


001402 








8EQ 


1$ 




2084 


007454 


000137 


036614 






JMP 


§#FPSPUR 




2085 


007460 


011637 


001236 




1 $ 5 


MOV 


CSP)#g*$TMP2 




2086 


007464 


022626 








CMP 


(3P)+, (SP)+ 




2087 


007466 


170205 








STEPS 


R5 


jGET EPS 


2088 


007470 


012700 


01 1554 






MOV 


#GGDATO,P0 


J GET THE RESULT 


2089 


007474 


174010 








STD 


ACOf CRO) 




2090 


007476 


012701 


011644 






MOV 


#GGP7,R1 


?IS IT CORRECT 


2091 


007502 


012702 


000004 






MOV 


#4,R2 




2092 


007506 


022021 






GG17S 


CMP 


(R0)+, CR1H 




2093 


007510 


001402 








BEQ 


GG18 




2094 


007512 


000137 


010730 






JMP 


DIGGER! 1 




2095 


007516 


077205 






GG18S 


SOB 


R2# GG17 




2096 


007520 


052704 


100000 






BIS 


#100000, R4 




2097 


007524 


020405 








CMP 


R4,R5 


;FPS CORRECT? 


2098 


007526 


001402 








BEQ 


2$ 




2099 


007530 


000137 


010776 






JMP 


PlGGERl 2 




2100 


007534 








2$: 








2101 


007534 


012704 


000012 




l$s 


MOV 


#12, R4 




2102 










:CHECK 


EEC 






2103 


007540 


170305 








STST 


R5 




2104 


007542 


020405 








CMP 


R4.R5 




2105 


007544 


001402 








BEQ 


GG19 




2106 


007546 


0QOU7 


001272 






JMP 


3GGER13 




2107 










jcheck 


UNDERFLOW CONDITION WITH 


TRAPS 


2108 










.•DISABLED (FIU 


* Q) 




210*9 


007552 








GG19: 








2110 


007552 


1044*3 








LPERR 




J SET UP THE LOOP ON ERROR ADDRESS. 


211 1 


007554 


012704 


000200 






MOV 


#0200, R4 


JSET FIU, FIV, AND FD 


2112 


007560 


170104 








LDFPS 


R4 




2113 


007562 


012737 


007610 


001236 




MOV 


#GG20,§#$TMP2 




2114 


007570 


012737 


011112 


000244 




MOV 


#GGER14,@#FPVECT 




2115 


007576 


012700 


011574 






MOV 


#GGP2 f RO 


?SET ACO OPERAND 


2P6 


007602 


172410 








LDD 


(RO),ACO 




2117 


007604 


012700 


011654 






MOV 


#GGP8,R0 


JFSPC 


211H 


007610 


172010 






GG20? 


ADDD 


(RO),ACO 


j TEST INSTRUCTION 
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DFFP&A.P1 1 



01-NOV-76 21506 



T2 



OVER\UNDER TEST 



2119 


007612 


4 1 ft TrtK 

1 /020t? 








c T tT r> c 
Sir PS 




* fl FT T IT D C 
, vj C- .1 fro 


2120 


00761 4 


012 700 


A 4 4 £" ii 

011554 






u n ti 

MOV 


4 r r nil t n da 
# bGUA 1 U f KO 




2121 


007620 


4 *T A A 4 A 

17 4010 







— — 


STD 


* a f on ) 

AL, # I HO J 




2122 


007622 


A 4 1 1 A < 

01 2701 


A 4 4 £ "3 A 

011634 






?*IU V 


# 1" 1" O ii Q 4 
f CjrCjPOf H 1 


.TP TP PflDOCTT 


2123 


A A 1 C 1 — 

00 7020 


012/02 


A A A A A A 
00000 4 






™ u v 


* A. D ~) 




2124 


007632 


022021 






/»t A 4 A 

GG2 1 : 


CMP 


(R0) +# ( Kl ) + 




21 25 


0076 34 


A A 1 A A O 

001 402 








OtU 


vj(j4 2 


— — ■ — ^. 


2126 


007636 


0001 37 


j\ A 4 A 4 A 

011210 








##GGER15 




2127 


A A "T £. A 1 

0Q70 4/ 


7 #205 








SOB 


R2.GG21 




2128 


007644 


A C T ^1 A Jl 

052704 


A A A A A A 

000004 






BIS 


#4 f R4 


jFPS CORRECT? 


2129 


007650 


AAA j4 AC 

020405 








CMP 


R4#R5 




2130 


007652 


001 402 








B£Q 


GG23 




2131 


007654 


A A A 4 *\ T 

0001 3 7 


A * 4 A IT 

011 256 


— - — — — - 




JMP 


0#GGER16 




21 32 












JCHECK 


UNDERFLOW CONDITION WITH TRAP 


2133 












j ENABLED (FIU s 1) 




2134 


007660 








GG23 S 








21 35 


A A *9 «£_ £. A 

007ob0 


104413 








LPERR 




?SET UP IHE LOUr UN ERKUK AUUHtoo « 


21 36 


007ob2 


01 2704 


002200 






H0V 


#2200, P4 


J SET Flu, FIV, AND FD 


213? 


007666 


4 ** A 4 A A 

170104 








L0FPS 


R4 




2« % 3 ^ 


007670 


012737 


007716 


A A 4 ^ "J k 

001236 




NOV 


#GG24, i# STMP2 




2139 


u y / / 


1 2 / i / 


00 115** 


A A A J A J. 
OOO44** 




MOV 


#GG25 # i#FPVECT 




2140 


007 704 


A 4 *1 "7 A A 

012700 


01 1574 






MOV 


#GGr2# R0 


; SET ACQ OPERAND 


2141 


00 / uu 


1 / 241 




. _ 




liDD 


CRO) , AC0 




2142 


0077 l 2 


A 4 1 1 A /i 

012700 


a 4 4 £ es Ji 

01 1654 






MOV 


#GGP8 f R0 


i F SRC 


A 4 A 1 
2143 


00 7 / 1 O 


1 /20 1 






v»b* 4 i 


ADDD 


(R0) r AC0 




2144 


A #i ^ 1 A /V 

007720 


4 *1 A A A 

170000 








CFCC 






21 45 


A A Tf *T "5 *1 

007 7 22 


A 4 llAft 

012/00 


A t t C C A 

1 1554 






MOV 


tGGDATOf R0 




2146 


007726 


4 *l /l A * A 

174010 








STD 


AC0 f CR03 




2147 


A A *t *5 A 

007/30 


A A A 4 'i 1 

0001 3 7 


A 4 4 

011324 






JMP 


ftlGGERl 7 




2l4g 


007734 


A 4 *5 *"1 A A 

01 3700 


A A 4 A ^ <£. 

001236 




GG25 : 


MOV 


STMP2 1 R0 




2 1 49 


A A *? *J A /» 

00 7 / 40 


A £. *5 1 A A 

062 /00 


000002 


_ 




ADD 


#2.R0 




2150 


007744 


A^ A A 4 £. 

020016 








CMP 


R0« CSP) 




A 4 C 4 

2151 


A A T "I A 

00 / / 4o 


A A 1 A A O 

00 1 402 










!$ 




2152 


007750 


0001 37 


0366 1 4 






JMP 


@ # FP5PUR 




2153 


A A "7 "1 C A 


At 1 Jl 


A A 1 Olfc 

uo 1 2 *o 




1 * t 
X 9 « 


MOV 


CSP).##$TMP2 




2154 


007 760 


A r\ *i ^ *S JL. 

022026 








CMP 


CSP)^, CSP)+ 






AA7 7&0 
00 / »02 








— _ — 


STFPS 


R5 


jGET FPS 


2156 


007764 


A 4 ^ T A A 

012 700 


011554 






MOV 


#GGDATO,R0 


; GET THE RESULT 


21 7 


00 7 / / v 


1 T d A 1 A 








STD 


ACO f (RO) 




2158 


A A **9 T 

007772 


A 4 * '} "7 A 4 

012701 


A 4 4 ^ £. A 

01 1664 






MOV 


#GGP9,R1 


JIS IT CORRECT 


2159 


00 ' * * o 


012 f 02 


A A A A A A 

00000 4 






MOV 


#4,R2 




2160 


010002 


022021 






GG26 ? 


CMP 


(R0) + » CR1 ) + 




2161 


A 4 A A A A 

01 0004 


A A i A A O 

GO* 4Q2 








BEG 


GG27 




2162 


010006 


0001 37 


011 372 






JMP 


a#GGER!8 




2163 


A * A A 1 *> 

1 001 2 


/ / 205 






c f ^ » 




R2.GG26 




2164 


01001 4 


052704 


100004 






BIS 


#100004, P4 




#165 


A 4 A A O A 

1 0020 


A O A A A«% 
02v**03 








CMP 


R4.R5 


;FPS CORRECT? 


2166 


010022 


001 402 








6E0 


1$ 




2 1 o 7 


A 1 A A O A 

010024 


A A A t 

0001 1 


A A 4 A C Cc 
001 4 JO 






JMP 


GGER20 




2168 


010030 


012704 


000012 




1$; 


MOV 


#12, R4 




2169 












;CHECK 


FEC 




2170 


010034 


170305 








STST 


R5 




2171 


010036 


020405 








CMP 


R4,R5 




2172 


010040 


001402 








BEQ 


GG28 




2173 


010042 


000167 


001372 






JMP 


GGER19 





i 



.2174 
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2175 


A 4 A A 4 L 

0100*6 


AAA! 11 

0001 5 1 


A 4 1 £"} A 

0116/4 




bbjCO * 


Tun 

<Jnr 






4 

w- , 


?176__ 




















217 7 


ft * ftftC^ 

1 003 I 


1 J / 1 


A A < lit 

0012 36 


— — — 


bUtRO * 


MU V 


v # S 1 W Fit f K I 






21.18 . 


01 0056 


062701 


000002 






ADD 


# 2f Rl 




1 


2179 


010062 


020116 








CMP 


RU (SP) 


< 




2180 


Q10OH 


001402 








8EQ 


1 OS 




1 
1 


2181 


010066 


000137 


036614 




5$: 


JMP 


§#FPSPUR 




2J82 


010072 








10$ : 






i 




2183 


A 4 A A *l f> 

010072 


4 1 A ^ ft * 

1 70301 




— — . 




ST8T 


r\ 4 

R 1 






2184 


010074 


A A A 4 V~V **H 

020127 


000010 






CMP 


R 1 1 i 1 




1 


2185 
218b 


010100 
010102 


001372 
022626 








BNE 
CMP 


5$ 

CSP1+, (SP)+ 


« 


i 


2187 
2188 


010104 
0101 10 


01 2700 
174010 


011 554 






MO V 
STD 


ff btiUAlU, HO 

AC f (R0) 






2189 


010112 


012737 


011624 


001240 




MOV 


#GGP5|§#$TMP3 






2190 


*t M A 4 *"% A 

0101 20 


012737 


A 4 4 r A j( 

011624 


A A 4 Jk ft 

001242 




MOV 


# GGP5 u pi $T"P4 




I 


2191 


A 4 A. 4 

010126 
010134 


012737 
012737 


A 4\ t f C jl 

01 1554 
011634 


A A 4 *% A A 

001244 
001246 




MU V 

U f**i \t 

MQV 


• /TlMilin fl * i* T U D S 

ivjGPDi $TMP6 


'i 
1. 


i 

i. 


2193 


A 4 A * /II 

010142 


! 04220 






1 $ • 


C D t> l"V D 

ERROR 


O O A 
440 




2194 


01 0144 


0001 37 


01 1 674 






JMP 


ilGGDOME 


1 




2 1 95 
2196 


010150 








GGER1 • 










2197 


010150 


010537 


001252 






MOV 


R5.§i$TMP10 


c 




2198 


010154 


010437 


001254 






MOV 


R4# ^#5TMPi 1 




g 


2199 


010160 


012737 


011624 


001240 




MOV 


#GGP5.^#$TMP3 


1 


2200 


010166 


012737 


01 1624 


001242 




MOV 


#GGP5# ##$TMP4 




*i r S A* 6 

2201 


A * A * A 

010174 


i * / 3 / 


A 4 4 C C A 


A A 1 *1 A A 

00* 244 




wuv 


f uviyAi UflpffSlr'rD 






2202 


010202 


012737 


01 1634 


001246 




&x r*n 

MOV 


#GGP6# 3# $TMP6 




i 
f 


a, a, a. ^ 

2203 
2204 


A 4 A 4 A 

010210 
010212 


104207 
0001 37 


011674 




4 A * 


tr* rs f* 

ERROR 
JMP 


1 A "t 

e#GGD0NE 


£ 


1 


2205 
2206 


010216 








GGER2 S 






1 




2207 


010216 


a* a e 

010537 


A f\ 4 AF A 

001252 






unu 
"U ¥ 








2208 


A d A A A 

010222 


010437 


001254 






MOV 


R4 f ©fSTMPl 1 




« 


2209 


010226 


012737 


011624 


001240 


: 


MOV 


IGGP5, @#$TMP3 


€ 




2210 


010234 


01273/ 


A 4 4 JL *S A 

01 1624 


A A 4 A 

001242 




MOV 


#GGP5f @i$TMP4 






1 1 4 4 

2211 


A 4 ATAI 


1 2 ' J f 


A 4 4 C C A 

01 1 55>4 


A A < 'i A A 

00* 244 










t 


2212 


010250 


012737 


011634 


001 246 




MOV 


#GGP6 # §#S TMPfo 


4 
1 




2213 


UluZob 








4 ^ a 


ERKOF 


d $ d 






221 4 


010260 


0001 37 


011674 






JMP 


i«GGD0NE 






2215 
2216 


010264 








GGER3 : 






1 




2217 


A 4 A *i £ A 

1 0*64 


A 4 fiCH 

01 033 / 


A A 4 1 C 1 

001252 






1^0 V 






i 


2218 


010270 


01 0437 


001254 






MOV 


f\ A A 11 A API lb T~\ 4 4 

R4 f i#$TMPl 1 




2219 


010274 


012737 


011624 


001240 




MOV 


#GGP5» @#$TMP3 






2220 


A- 4 A J A 

010302 


A. 4 1 "1 ^ 

012737 


011624 


it ft 4 ^ A **) 

001 242 




MOV 


#GGP5 f p# STMP4 




i 


2221 


010310 


012737 


011554 


001244 




MOV 


#GGDAT0,##$TMP5 


t 




2222 


010316 


012737 


011634 


001246 




i| A If 

MQV 


#GGP6 # @# STMP6 






2223 


010324 


104221 






IS; 


ERROR 


221 




g 


*> O *> A 


A 4 ft 3 

010 3^6 


A A A 1 "ST 

0001 3 / 


A 4 4 ilA 

011674 






JMP 








2225 
2226 


010332 


000706 






GGER4; 


BR 


GGER1 




4 


2227 

2228 


010334 








GGER5 : 






1 


4 


2229 
2230 


010334 

_0JJ>340 


010537 
010437 


001252 
M 1254 






MOV 
MOV 


R5.##$TMP10 
R4,^#$TMPH 


i 



maindec»ii~dffpb«a 
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IT 


dffpbaVpu 


51 -NOV- 76 


21 ; 06 




12 


QVERXUNDER TEST 




t 


2231 

2232 


010344 
010352 


012737 
012/37 


011624 

A 4 4 £L ^% A 

011624 


001240 
001242 




MOV 

kM f"l At 

MQV 


#GGP5,§#$TMP3 
#GbP5# »#ST"P4 






2233 
2234 


010360 
010366 


012737 
012/37 


011554 

A 4 4 £ 4 /i 

011634 


001244 

A A 4 1 it t*. 

001246 




MOV 
MOV 


#GGDATQ,P#$TMP5 
#GGPb« SiSTMPb 




I 


2235 
2236 


010374 
010376 


104226 

A A A t 1 1 


A 4 4 a T * 

0116/4 




1$: 


ERROR 
JMP 


226 

£#GGD0N£ 




i 

1 


2237 
22 38 


010402 








GGER6 : 






1 




2239 
2240 


010402 
010406 


010537 
010437 


001252 
001 254 






MOV 
MOV 


R5,##$TMP10 
R4, §#$TMPl 1 




< 


2241 

2242 


010412 
010420 


012737 
0127 37 


0U624 
011624 


001240 
001242 




MOV 
MOV 


#GGP5, e#$TMP3 
#GGP5, P#$TMp4 


1 




2243 
2244 


010426 
010434 


012737 
012737 


011554 
011634 


001244 
001246 




MOV 
MOV 


#GG0AT0 f §| $TMP5 
#GGP6, i#$TMP6 


4 




2245 
2246 


010442 
010444 


104227 
0001 37 


011674 




1$5 


ERROR 
JMP 


227 

^#GGDONE 




1 


2247 
2248 


010450 


013701 


A A 1 A ^ jT 

001236 




GGER7 I 


MOV 


@S$XMP2r Rl 


1 




2249 
2250 


010454 
010460 


062701 
0201 16 


000002 






ADO 
CMP 


#2,R1 
Rl $ (SP) 


4fl' 




2251 
2252 


010462 
010464 


001402 
000 1 37 


0366 1 4 




5S? 


BEG 
JMP 


10$ 

##FPSPUR 




< 


2253 
2254 


010470 
010470 


170301 






10$: 


STST 


Rl 


€ 


1. 


2255 
2256 


010472 
01047© 


020127 
001 372 


000012 






CMP 
BNE 


Rl. »12 

5$ 


i 




2257 
2258 


010500 
010502 


022626 
012700 


011554 






CMP 
MOV 


(SP)+, (SP)+ 

fGGDATO.R0 




4 


2259 
2260 


010506 
010510 


174010 
0127 37 


01 1604 


001 240 




STD 
MQV 


ACO. (RO) 
#GGP3# @i$TMP3 


t 


g 


2261 
2262 


010516 
010524 


012737 
012737 


011574 
011554 


001242 
001 244 




MOV 
MOV 


#GGP2 # §#$TMP4 
fGGDATO, @#$TMP5 


• 




2263 
2264 


010532 
010540 


012737 
104224 


011634 


001246 


1$ s 


MOV 
ERROR 


#GGP6,t?#$TMP6 

224 




1 


2265 
2266 


010542 


000137 


011674 






JMP 


§#GGDONE 


4 


g 

m 


2267 
2268 


010546 
010546 


010537 


001252 




GGER8? 

- - 


MOV 


— 1I ___^^_ TO ^,_^__.^ J _ = __. 

RS- ##$TMP10 


A 

1 




2269 
2270 


010552 
010556 


010437 
0127 37 


001254 
011604 


001 240 




MOV 
MOV 


R4.@#$TMP11 
ldGGP3# @#$TMP3 




4 


2271 
2272 


010564 
010572 


012737 

a « n n 

0127 37 


011574 
011554 


001242 

A A 4 ** >l 

001 244 




MOV 
MOV 


#GGP2 f §#$TMP4 
#GGQATO, @#$TMP5 


4 


g 


2273 
2274 


010600 
010606 


012737 
104207 


0U634 


O0U46 




1 $ 5 


MOV 
ERROR 


IGGP6.§#$TMP6 
207 


4 




2275 
2276 


010610 


000137 


011674 






JMP 


td#GGDONE 




4 


2277 
2278 


010614 
010614 


010537 


A A 4 M 

001252 




GGER95 


MOV 


: — , — 

R5r ^#$TMP10 


€ 


1, 


2279 
2280 


010620 

A 4 A k 1 Jl 

01 0t>24 


010437 
01273/ 


001254 
011604 


A A 4 ^ A A 

001240 




MOV 
MOV 


R4 f §#$TMP11 
#GGP3 # §i#$TMP3 


1 




2281 
2282 


010632 
010640 


012737 
QUI S 1 


011574 

n 4 4 C C /I 

01 1554 


001242 

A A 4 '1 A A 

001 24* 




MOV 
MOV 


IGGP2-@#$TMP4 
#GGDATO.§#$TMP5 




1 


2283 
2284 


010646 
010654 


012737 
104232 


011634 


001246 


i$; 


MOV 
ERROR 


#GGP6.@#$TMP6 
232 


4 


1 _ 


2285 
2286 


010656 


000137 


011674 






JMP 


iMGGDQNE 


i 



4 



t 
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O 1 O "l 


A 4 A &. _. 

01 0662 
















ft. fti ft 

2288 


010664 


ft * ft C ft* '"I 

010537 


A ft 4 ft Cf ft 

001252 


. _ — ~ 




MOV 


P5#f#$TMP10 


g 
1 




22»9 


1 0&06 


A 4 A A a T 

0104 J / 


A A 4 1CA 

00 123** 






"U w 








ft. ft. j*. 

2290 


01 0672 


A 4 O T 5 T 

0127 3/ 


A 4 4 £L A A 

011 604 


A A 4 ft At ft 

001240 




H0V 


f &GP 4# STMP4 




1 


4/91 


A * Al Aft 

010 / 00 


A 4 Ola"? 

014/4' 


A 4 4 C "7 A 
1 1 3 / 4 


A A 1 '1 A O 

00 1242 




V 


# i*" n *} ft w t t u n A 


f 




229J 


/% 4 ft ""J ft £_ 

010706 


012737 


011554 


ft ft 4 A l >i .1 

001 244 




"U V 


•* i"- /** r\ A T 1 n a « « r udc 
* CjlaUA J.U, (« US IMFD 




2293 


010/14 


012/37 


ft 4 4 __. A h 

1 1 04 4 


A A 4 j* ^. 

00 1246 




WU ¥ 


D1 CltitTUDt 

ffviVjr / ^t?lf§iMrO 


- — — — — ————— — __~__ — _ — - — —— — -~ — — — 


i 


2294 


A g A *f ft "fc 

010722 


104225 






4 A a 

1$ ! 


ft I** n ri 

ERROR 


one 

225 


f 




2295 


0107 24 


A A A 4 1 1 

0001 37 


ft 4 4 £. T >l 

011074 






JHP 


_ u crnn * 1 1* 
PfflabUONE 






229$ 


















i 


Ann i 

2297 


A 4 A T 5 A 

0107 30 








Jft f* IT* r. 4 4 # 

Vj<5EK 1 1 * 






g 




ft. ^\ t\ 

2298 


ft 4 A, *t _ A 

010/30 


ft 4 ft c ^ *7 

010537 


ft ft 4 ft C 

001252 






u n 1/ 

MOV 


r*| C ;_ It /» W il H 4 ft 

R5f (?#$TMP10 






ft ft f\ i"\ 

2299 


A * ft '"I _| A 

010734 


ft 4 ft ^ T 

01043/ 


*^ ft 4 ft C it 

001254 




— — 


MOV 


Oil £t#£~U[)4 4 

H4, §TMr 1 1 




i 

i 


2300 


A 4 A *f jf A 

01 07 40 


ft 4 **> T *1 

012737 


ft 4 4 __: ft il 

Oil 604 


ft ft 4 ^ A i\ 

001 240 




MOV 


#GGP3# w# $TMP4 


1 




lift* 
2401 


010 /*6 


a 4 n n 
014/4/ 


A 4 4 C 1 A 

0115 7 4 


A A 1 *> A J 

001244 


_ 


^UV 


f V»GP 4#^W5lMP4 






2302 


A 4 Alt A 

010754 


012737 


ft 4 4 P _* * 

01 1554 


ft ft 4 ^ A A 

001244 




Il4 If 

MOV 


#GGDAT0# @| $ IMP 5 




i 
I 


1 ft, 

2303 


A 4 Altl 

010/62 


a 4 n n 
012 73/ 


ft 4 4 __. A A 

I 1 644 


ft ft "1 *\ A _L 

001 2 4o 






*t f~ r* r> 7 a * * "MiDt 
Itsiar / | !? ff $ I "P 


A 




2304 


A 4 ft *f ~ f ft 

010770 


4 ft >i *i ft "i 

104207 






1$ S 


ERROR 


207 






2305 


A 4 A Tf *f ~i 

010/72 


A A A 4 J1 

0001 37 


011674 






JNP 


PIGGDONE 




g 
i 


2306 




, 












• 




4 307 


01 / 7& 








GCiER 1 2 S 




— _____ — — ; 






_ *4 ft ft 

2308 


ft 4 ft *7 "f __. 

010770 


a 4 fte n 

010537 


ft ft 4 ft C ft 

001252 






MOV 


R5f i#STMP10 




i 


2309 


A 4 4 A A 1 

01 J 002 


A 4 A A ^ T 

01044/ 


A A 4 IE Jl 

001 254 








_>A Q * i TUD 1 4 

H 4 « is # & J Mr 1 1 


J 

1 




2310 


A 4 4 AAL 

011 006 


ft 4 ft ** ~S 

012737 


ft 4 4 £1 ft j4 

01 1604 


A A 4 1 ii A 

001240 




MOV 


m r* /** ts "_r fti_^~ri%jfti_ 

IGGP3 »• pi $TMPB 




t 


i 3 1 1 


A 1 1 A 4 A 


A 4 *J "J 1 7 

014/4/ 


A 4 1 C14 

0115/4 


A A 1 lAI 

001 242 




MOV 


# GGP2# pf $ IMP 4 




2312 


ft 4 4 ft O **_■ 

011 022 


A 4 *i *7 3 7 

012737 


ft 4 4 if tf il 

011554 


001 244 




a f*i \i 
MOV 


« yGUAl U,?9f$TMr5 


. 1 




*_i f_ * ■"_ 

2313 


ft 4 4 ft _l ft 

1 1 030 


A 4 *» "J "3 *J 

0127 3 7 


ft 4 4 A A 

01 1644 


ft ft 4 **i Ji _L 

001246 




U i - 1 4/ 

MOV 


f GGP 7 * ?? # 5 a MPo 






2314 


ft 4 4 ft _L 

Oil 036 


4 A A 1 > 4 

104231 




— , „ 


1 $ : 


ERROR 


1^4 

231 






nit 
2315 


A 4 4 A A A 

0110 40 


A A A 1 5 *l 

0001 4 / 


A 4 4 £. t A 

011674 






tun 

JMP 


t_fc 4» /** ^* r% ink tf is** 
PlGGDONE 


g 
I 




2316 




















*5 _ 4 "7 


A 1 1 AAA 

01 10 4 4 








ft* C* ti 4 ^ • 

bbfe-R 14" 






, . , , — , _ 


1 


2318 


A 4 4 f\ A A 

0110 44 


A 4 A C 1 *7 

01053 / 


ft ft 4 ft C *"* 

001252 




. 


u 1/ 
MOV 


R5# f?# $TMP1 


I 




4 4 I 7 


A 1 1 A<> A 

V I J. U3 V 


a i Ain 

J. v** 4 / 


A A 1 r yt\A 
v v + 2 3 Tt 








4 f !? f i> l fir 1 1 






2320 


A 4 4 nCA 


A 4 O 1 T 

0127 37 


A 4 4 £ A X 

011604 


ft ft 4 O 4 A 

001 240 




MOV 


#GGP3 r P# STMPi 




1 


4 4 21 


A 1 1 A A *3 
U J. * UD 4 


012/4/ 


A 1 1 CI A 

1 1 3 / "4 


A A 1 OA*) 

001 242 


. — . 


MO* 


§ Gv?P4 f w % 9 I MP4 


g\ 
1 




2322 


A 4 4 *7 /\ 

0110 70 


012737 


01 1554 


A A 4 ft il A 

001 244 




i_ _~. ir 

MOV 


#GGDAT0|i »|i $TMP5 






* i 4 3 


A 4 4 A *7 rf» 

0110/0 


A 4 

012/3/ 


A 4 4 L. A i4 
01 1644 


A A 4 *> A tW 

001 240 


_____ _____ 


tint; 
"U V 


f GGr / ^ So $ 1 MPo 




1 


ft ft ft At 

2324 


ft 4 4 4 ft VI 

011104 


4 A it *** ft 

104230 






1$: 


ERROR 


ft ^ ft 

230 


4 
1 




nit 


A 4 1 1 A fc. 
1 1 1 Ut> 


A A A 4 1 *? 

0001 4 / 


A 4 4 C "J j4 
01 16 /4 






tun 


PiGGUONE 






112.6 . 


















1 


232 7 


A 4 4 4 4 O 
011112 


A 4 ilrtl 

014/01 


ft ft 4 ft i a 

001236 




f* f* C fi 4 A • 


MQV 


ft. _t A ii rs ^ r% 4 

§#$TMP2f Rl 






2328 


011116 


062701 


000002 






ADD 


# 2 # R 1 






2329 


A 4 4 4 T 1 

011122 


A ft A 4 4 ^ 

0201 1 6 






__ 


CMP 


Rl « (SP) 




t 


__2J.30 


0JJl121.„ 


_JL0.H0 2 _ 








BE0 


10$ 


4 




2331 


A 4 4 4 *i L. 

011140 


A A A 4 ^ T 

0001 3 7 


030614 




5S 5 


JMP 


PIFPSPUR 






ft *_i a 


A j 4 4 *\ ft 

011132 




_ 




10SS 








4 
1 


4 J 3 3 


01114 2 


1 /0 J01 








— , 

STST 


n 4 

R 1 


1 




ft. ft ^ A 


011134 


A ft A A ,*k *f 

020127 


00001 2 






CMP 


Rl i # 12 






4455 


A 4 4 4 A A 

011140 


A A 4 1 T 1 

001472 








QUE* 


5$ 






2336 


A 4 4 4 A I 


022626 








t* U D 

CMH 


C or} + # ( or J ♦ 


4! 
.1 




2337 


011144 


012700 


011554 






MOV 


#GGDATO,R0 






2338 


011150 


174010 








STD 


AC0 # (R0) 






2339 
















1 




2340 


011152 


012737 


011564 


001240 




MQV 


«GGP1,@#$TMP3 






2341 


011160 


012737 


011604 


001242 




MOV 


#GGP3,@#$TMP4 




« 


2342 


011166 


012737 


011554 


00JL2,4A 




MOV 


#GGDAT0,##$TMP5 


( 
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2 3 4 J 


A 4 4 1 "7 /I 

V 1 1 1 7 4 


A t 0117 

1 4 / 3 f 


A 4 1 t 34 

1 1 6 3 % 


A A 1 7 A A 

y y 1 £*»o 






#rrpt fin <t IMC A 


ft » * 

2344 


Oil 202 


104222 






1 $ * 


C 1 jt» ti r 1 * ri 


ft 1 1 
222 


2345 


A 1 4 '1 ft A 

011204 


A A A 1 3 7 
00013/ 


A 4 4 _ 7 A 

0116/4 






TMD 

u " r 




2346 
















O 1 A ft" 

2347 


A 1 4 ft 4 ft 














2348 


011210 


a 4 ncn 
01053/ 


/\ /s * i"% j_ **i 

00125? 






WO V 


DC ^> 1<UD 1 A 

HDi 9tS InrlU 


2349 


A 4 1*)1A 
U 1 I 4 1 4 


A 4 A A 3 7 

y 1 y *t 4 / 


A A 1 OKA 

yy l 45** 






un V 

™ KJ ¥ 


PA i& t <TMP 1 1 


2 350 


A 4 4 7 1 A 

01 1220 


A 4 *3 7 3 7 
1 * / 3 / 


A 4 4 K 7 A 
1 1 5 / 


ft A 4 ft A A 

00 * 240 




MUV 




7 ■a k 4 


A 1 4 7 7 A 

VI 1 4 4 O 


A 4 77 3 7 


At 1 A<ft A 


A A 1 7 A 7 




1*1 u » 


ififipfl . an <!Tmd4 

t uvrP> <p » 1 n t* ■* 


ft 1 c a 


A 4 4 Hi 

0112 3 4 


A 4 7 7 3 7 
012/3/ 


A 4 4 C C A 

011554 


ft A 4 *1 A A 

001 244 




rJ fi 1/ 






A 4 4 7 A O 

0112 42 


a 4 7 7 3 7 
012/3/ 


A 4 4 £. 3 A 

0116 3 4 


A A 1 7 A A 
00 * 4 40 




nil! 




ft ^ r j 

2354 


A 4 4 ')C/i 

01 1250 


4 A 4 A 1 

10420/ 






4 * • 
IS* 




7 A 1 
20 / 


2355 


A 4 1 TCI 

011252 


A A A 4 3 7 
00013 / 


A 4 1 £. 7 A 

0116/4 






Tun 

J Mr 


p V»viUUN 


2356 
















ft "a c n 
235 7 


A 4 4 1C£ 

Oil 256 


_ 






rev? a t A * 
IsmrR 10; 




. . 


235fe 


A 4 4 TEA 

Oil 256 


010537 


a a 4 ft e ft 

001 252 






u r*i tr 
MOV 


R5 r <P# STMP 1 


2359 


A 1 4 7 A 3 

1 1 £$2 


A 4 A A 3 7 
1 04 3 I 


A A 4 ft Q A 

001254 






nU * 


PA fit ft TMD 1 4 


2360 


A 4 4 ft i£ 

011 266 


A 4 ft. ft ''3 ft 

012737 


A 4 4 C ft >l 

011574 


A A 4 ft A A 

001240 




MOV 


8C*GP2# @#STMP3 


23&1 


A 4 1 > 7 A 
U 1 1 * / 4 


A 4 7 7 3 7 
012/3/ 


A 4 4 £. <k A 

I 1 054 


A A 1 7 A7 

00*242 




MUV 


f vjv»F * f v IF § 1 n P 4 


2362 


A 4 4 1 A *J 

011302 


A * ft ft "j ft 

012/3/ 


A 4 t c a A 

01155 4 


A A 4 ft A A 

001 244 




WU V 


f btjPA 1U| FfS 


7 3 A 3 

* 303 


AM 11 A 

011310 


A 4 7 7 3 7 
012/3/ 


A 4 4 & 3 A 

0115 3 4 


A a 4 7 A A 

V 1 2 4 O 








7 3 & A 


A 4 4 3 4 I. 
011310 


4 A A 7 3 5 

104432 






1 S • 


&HHUH 


232 


ft'jte 
45 JO? 


A 1 1 3. 3 A 


A A A 1 3 7 
000 I 3 / 


A 4 1 £ 7 A 

1 1 O / 4 






run 

y Wlr 




ft ft £ i 

2366 
















7 3 A 7 
2 30 / 


a 4 1 "a ft a 
V 1 1 3 / * 


_______ 












ft 3£ O 

230s 


A 4 4 IS ft A 

011324 


At AC 3 7 

I 05 3 / 


A a 4 ft e ft 
001252 








DSL Q««TUD1 A 

1^5 # 1 5 * Mr 1 


7 3 A 

2 309 


A 4 1 3 3fi 

0113 30 


A 4 A A 3 7 

104 3 / 


ft ft 4 ft E A 

00125 4 






™U V 


PA OittUDl i 


7 3 ft ft 

2370 


A 1 1 3 3 A 

U 1 I J J 1 


A 4 7 Tf 3 "T 

012/3/ 


A 4 1 CIA 

0115 / 4 


A A 1 7 A A 

001 240 




uAir 
WU V 


fbvjr/f SlrrJ 


* 3 1 1 


A 4 4 3 A *3 


A 1 7 7 3 7 

y l 4 1 S f 


A 1 1 A 

y 1 io3t! 


A A 1 7 A7 

y y * *4* 




"U V 


#nr!D& ate ti»da 


ftll!i 

23/2 


A 4 1 3CA 
011 350 


A 4 7 7 3 7 
012/3/ 


A 4 < CCA 

011554 


ft ft 4 *3 A A 

00 1244 




"1U V 


f wV?UA lUfe»#§lPir5 


ft ft ft; *} 


A 4 1 KfL 

01 1 350 


a 4 7 7 3 7 
1 * / 3 / 


A 4 1 & £. A 
01 10O4 


A A 1 7 A A 

00 * 240 




~ U ¥ 




2 3/4 


A 4 4 HA 

01 156* 


4 a A 7 O i 
104423 






4 e> • 

15? 


£T Ci D f 1 D 


7 7 3 
2 2 3 


7 37 c 


A 1 1 Ihh 


AAA4 37 


A 4 1 & 7 A 
y 1 1 O / * 






1 tJt D 




2376 














— _ , : 


7377 
IS I 1 


A 4 1 3. 7 7 
y 1 1 3 1 £ 








f fit? 4 s • 






7 3 7 £i 

23 / o 


A 4 4 3 7 7 

0113/2 


A 4 A C. 3 7 

1 05 3 / 


a a 4 ft e ft 
001 252 






f^U v 




# -5 # 3f 


A 1 4 3 7 £ 


A 4 A A 3 7 

y I y ** / 


A A 1 7 *\ A 

y y 1 £ 7 ** 






MOV 


DA CTUp 4 4 


7 3 O A 

2380 


A 1 1 A A 
vl 1 *ty 4 


A 4 7ft J ft 
y 1 4. 1 3 / 


A 1 1 614 

y 1 1 7 / 4 


A A 1 7 A A 
U 1 4 4U 




unv 
WUV 


f valsr 4 y (ptSlnrj 


7 7fl i 

£ J v 1 


A 4 4 A 4 A 

U 1 A ■** 1 V 




A 4 1 Aft A 


A A 1 7A7 
y V * £ *t £ 


-— 


™U V 




2382 


A 4 4 A 4 & 
1 1 4 1 


A 4 7 7 3 1 

012/3/ 


A 4 4 CCA 
Oil 554 


ft ft 4 *3 A A 

001 244 




~y v 


IvjvjUAlUi WffS l Pir 5 


* 3 3 4 


A 1 1 AO A 
V 1 1 4 4 4 


A 1 7 7 J 7 

y 1 £ f 3 ! 


A 4 1 A A A 
01 1 w O * 


A A 1 7 A A 

y y 1 £ 4« 




Mnv 




2384 


A 4 4 A 3 7 

01 1 **32 


4 A A 7 A "T 

1 0**20 7 






15 5 


PDDflD 


7 A *? 
4U / 


7 7 s 


A 4 1 A 3 A 


A A (\ 1 3 7 

y y y j. 5 1 


A 1 1 im. 7 A 






TUD 

yMr 




ft "i o £ 

2386 














: . 


1 fi 1 

2 So I 


a 4 4 AAA 

V 1 1 4 *tO 








flfiea 1 Q • 






ft ft O O 

23o« 


A 4 4 AAA 

0114 40 


A 4 A K 3 7 

01053 / 


A A 4 ft C ft 

001 252 






U fl 1/ 

rlU V 


H5 f l?#Sl^"10 


ftlflO 

23o7 


A 4 4 AAA 
1 1 4 


A 4 A A 3 7 
010^3 / 


A A 1 ft C A 

001 254 






™U ¥ 


da a Jt t TMD 1 1 


2390 


A 4 4 A C A 

011 450 


A 4 7 ft 3 ~ 

0127 37 


ft 4 4 E ft A 
0115 74 


A A 4 ft A A 

001 240 




a rk \t 


u r> ft a # 'pu n 3 


* 3 ' J 


A 1 1 A ft A 


A 1 '^737 


< 1 1 1 A <s A 
Ul 10 Jt 


A A 1 7 A 5 

y y 1 4 4 4 




HU ¥ 


l«wr O f <Pff!slriK"* 


O 3 
23^2 


A 4 1 AAA 


At 7 7 3 7 
014/3/ 


A 4 1 CSA 

01 1554 


A A 1 7 A A 
00*44** 




Mnv 


|w«yHlU|!?#5 1 "rP 


2393 


011472 


012737 


011664 


001246 




MOV 


#GGP9,@#$TMP6 


2394 


011500 


104230 






1$: 


ERROR 


230 


2395 


011502 


000137 


011674 






JMP 


»#GGDGNE 


2396 
















2397 


011506 








GGER20: 






2398 


0ll50o 


010537 


001252 






MOV 


R5,^#$TNP10 





4 39^ 


vl 13 14 


U 1 v4 j / 


A A 1 "5 R A 








D4 OMCTMD11 




1 

* __ 




011516 


0127 37 


01 1574 


ft ft 4 ft A ft 

001240 




.i ii 

MO" 


W VabP 4 # 3 # SIMP 3 


£ 




A n. i 
4401 


vl 1 3 4 4 


a 4 5717 
014/3/ 


A 1 1 R R A 

U 1 10 5 4 


A A 1 AO 
UU 4 444 












2402 


011532 


0J.27 37 


011.554 


001244 




^0 V 


f V?V»P A 1 UftSfSlMrp 




1 


44(1 3 


Q 1 1 5 40 


A 4 17 17 

014/3/ 


A 4 4 R R A 
01 1604 


A A 1 OAK 

001 440 








i 




2404 


01 1 546 


IQ4231 






1 $ * 


ERROR 


2 31 






44P5 


A « 1 CCA 

Q I 1550 


A A A 4 *3 "7 
00013/ 


A 4 4 R TP A 

0110/4 






y Mr 






i 


2406 

















1 




1 Jt ft, ~ 1 

2407 


A 4 4 R C A 

011554 


A A A A A A 

000000 

















1 lj Aft 

2408 


A * 4 R C _. 

011556 


A A A A A A 

000000 
















l 


440? 


01 1500 


A A A A A A 

000000 








A 
U 




— 

I 




2410 


A * 4 C £. **k 

011562 


/\ A A A A A 

000000 








A 








1. 


2411 






— — 




__________ 




______ . ~ — — — — _ , . . . ■ — — ■ — 


4 


*> A 4 A 

2412 


A 4 4 R R A 

011564 


A A A U A A 

000300 






t* f TS 4 • 


*a a a 
300 






4413 


01 1 500 


A A A A A A 








A 



. 






2414 


A 4 4 R T ( A 

011570 


A A A A A A 

000000 









A 







i 


*} A 4 R 
4415 


A 4 i R 7 O 


A A A A A A 

oooooo 








A 
W 




§ 




4416 


A 4 4 R 7 A 

0115/4 


4 A A A A 

1 00400 


_______ 


——————— 


^ r\ m 


1 A A O A A 
1 00400 








4 41/ 


a i 1 R7m 


A A Art A A 








A 
W 


________________ . — . _ __ . , — 




i 


44 1 y 


A 4 4 R A A 
01 I ©00 


A A A A A A 
000000 








A 





g 
I 




44 1 y 


1 1004 


A A A A A A 

oooooo 








A 
U 


_ . , 






2420 


A 4 4 *w A A 

1 1 4 


A A A A A 

000400 






hxit? 3 ; 


O A A 

400 






i 


A O 4 

44 41 


01 lOUO 


A A A AAA 

VUvvUv 








A 

M 




I 




4422 


A 4 4 R 4 A 

011010 


ft ft ft ft ft ft 

oooooo 

















44 4 3 


V 1 1 O 1 4 


A A A A A 1 

yvvvU 1 








4 

1 






I. 


*424 


A 4 4 4 4 A 
011014 


A 4 ft^Afi 

010400 






VjVjP4 • 


4 A *J A A 

10400 


. : 


j 

1 




*5 _*>r 


A 4 1 K<h 

Ul IwlP 


A A AAA A 








A 
U 








4426 


A 4 4 R *} A 

011620 


A A A A A A 

oooooo 








A 







i 


4447 


A 4 4 R *5 ""i 

01 1044 


A A A A A A 

oooooo 








A 









2428 


A * 4 i T y| 

01 1044 


AT 1^ AA 

07 / 000 






GQ»P5 5 


*J T R A A 

/ / 000 


fOVfc.R r LiOW — bv»P5 + bv?r5 




It 


2429 


A 4 1 41t 

011040 


A A A A A A 

oooooo 








A 







24 30 


A * 4 R A 

01 1 6 30 


A A A A A A 

oooooo 








ft 






g 

1 




24 31 


01 10 34 


ft ft 4% ft ft f\ 

oooooo 






. 


A 









2432 


A 4 4ilA 

011034 


A A A A A A 

oooooo 






vsv»P6 i 


A 




• nuPDrt nui occur t» 




i 


44 3 3 


A 4 1 Alh 

U 1 1 O JO 


A A A A A A 

oooooo 









A 

V 


• itiunFPfrt.nw d r qh i.t 


1 




2434 


011640 


oooooo 











;(?GrO - (jbP4 + bv?P5 






44 35 


1 1 O 4 4 


ft ft ft ft ft A 

oouooo 








A 







1 


2436 














m — » c r* n ~i « f r'~' D * 
i 5 VjCjP 3 4- GUP 1 


_._t 




44 Jl / 


U 1 1 v -?4 


AR"5 AAA 






(ZflDl • 


A O 4 A A 
O 4 Uv 








2438 


01 1646 


oooooo 















i 


oa la 
443V 


A 1 1 KR A 


A A A A A A 








A 

M 




i 




2440 


1 1 65 J 


oooooo 

















*5 A A 4 

44 4 J 


A 4 1 R A 

01 1 O D *t 


AAA i A A 
U v U 3 4 U 






vjvjP p • 


> A A 

3 40 






if 


<\ i j n 


01 1656 


/\ A A A A A 

oooooo 

















*i A A 1 

2443 


A 4 1 k£A 

Oil 000 


AAA A A A 

oooooo 






— 


A 




, — , — 






2444 


011662 


*V. A ft /V /V /"v 

O0OQ0.0 

















O A AR 
44 4p 


A 1 1 A A A 
Ul 1 O 4 


A A A 1 A A 

OOU 1 oo 






C n Q • 


1 AA 

1 ou 








Ail/ 

2446 


011 666 


^_ a ft f\ fk. /\ 

oooooo 

















4 4 "t / 


A 4 1 R 7 A 


A A AAA A 

uouuoo 








A 

u 


— . ™™_™ — __ — — , — ■ , , , 




"5 A A ft 
4 4 'HJ 


V 1 1 / 4 


A A A AAA 

oooooo 








A 

u 




• 




2449 


011674 








GG00NE5 










2450 


01 1674 


104412 








RSETUP 


jGO INITIALIZE THE FPS AND STACK J AND 




c 


2451 














?SEE IF THE USER HAS EXPRESSED 


i 




2452 














jTHE DESIRE TO CHANGE THE SOFTWARE 




4 


2453 














?VIRTUAL CONSOLE SWITCH REGISTER (HAS 




2454 














S THE USER T3f PED CONTROL G? ) . 


t 



MAINDEC"! 1 *DFFP8*A 



POP 11/34 FPP DIAGNOSTIC PART 2 MACYll 27( 1006) 07-FEB-77 12106 PAGE 46 



DFFPBA#P1 I 



01~NQV~7fe 21S06 



T2 



QVER\UNDER TEST 



2455 
2456 



2457 1 

2458 s 


• *TEST 3 LDCFD AND LOCDF TEST 


1 2459 ! 

2460 : 


' * 

f#THIS IS A TEST OF LDCFD AMD LDCDF. 


2461 ; 
i 2462. 1 


• # 

1 ; #########«-#♦########*#######*♦######*###♦*######♦*##*#####-»*##* 



2463 011676 000004 
2464 



TST3J SCOPE 

; TEST FOR CORRECT AUTO INCREMENT CONSTANT, 



2465 0U700 



HX1 : 





2466 


011700 


1044|3 






LPERR 




JSET UP THE LOOP ON 


ERROR 


ADDRESS, 




4 


2467 
2468 


011702 
01170& 


012704 
170104 


000200 




mov 

LDFPS 


#200, R4 
R4 








f 




2469 


011710 


012700 


013314 




MOV 


iHXPl ,R0 












2470 


011714 


172410 






LDD 


(RO) , ACO 










S 

1 


2471 
2472 


011716 
011722 


012700 
012737 


013324 

011730 001236 




MOV 
MOV 


#HXP2fR0 
#HX2,$#$TMP2 








I 


1 


2473 
2474 


Oil 730 
011732 


177420 
020027 


013330 


HX2? 


LDCFD 
CMP 


CRO)+, ACO 
R0,#HXP2+4 


?IS RO CORRECT 






1 




2475 
2476 


011736 
0117 40 


001402 
0001 37 


012672 




BEO 


HX3 

A it U VCG 1 

tSfHXERl 










t 


2477 
2478 


011744 
011744 


170205 




HX3: 


STFPS 


R5 


; GET FPS 






f 


I 


2479 


01 1 746 


012700 


013304 




MOV 


#HXDATO, RO 










2480 


01 1752 


174010 






STu 


ACOt (RQ J 


JkbT ACO 










2481 


011754 


012701 


013374 




MOV 


IHXP7, Rl 


?SEt IF RESULT IS 










2482 


011760 


012702 


000004 






#4,R2 


?C0RRECT 








1 


2483 
2484 


01 1 764 
011766 


0221 20 
001415 




HX4 5 


CMP 

BEQ 


C R 1 J +f ( RO ) + 

HX7 








V 


4 


2485 
2486 


011770 
011774 


012701 
012700 


013324 
013304 




MOV 
MOV 


#HXP2f Rl 
#HXDATO f RO 


?DID FD GET 

j COMPLIMENTED? 






i 




2487 


012000 


012702 


000004 




MOV 


#4,R2 












2488 


012004 


022120 




HX5: 


CMP 


CR1)+, CRO) + 










1 


2489 
249 ft 


012006 
012010 


001402 
000137 


012732 




8EQ 
JMP 


HX6 

@#HXER2 








1 


< 


2491 
2492 


012014 
012016 


077205 
000137 


012762 


HX6: 


SOB 
JMP 


R2 f HX5 
§#HXER3 








1 




2493 


012022 


077220 




HX7: 


SOB 


R2,HX4 












2494 


012024 


012704 


000200 




MOV 


#200, R4 


JFPS CORRECT? 








1 


2495 
2496 


012030 
012032 


020405 
001402 






CMP 

BEO 


R4,R5 
HX8 








< 


i 


2497 


012034 


000137 


013030 




JMP 


#*HXER8 










2498 








jNOW 


TEST 


LDCDF 








i 




2499 
2500 


012040 
012040 


104413 




HX8 : 


LPERR 




;$ET UP THE LOOP ON 


ERROR 


ADDRESS. 





2501 012042 012704 000200 

2502 012046 170104 



MOV *200, R4 
LDFPS R4 



2503 

2504 012050 012700 013314 



MOV 



IHXPl, RO 



2505 


012054 


172410 




LDD 


(RO),ACO 


2506 












2507 


012056 


012700 


013324 


MOV 


#HXP2,R0 


2508 


012062 


012737 


012072 001236 


MOV 


#HX9,$#$TMP2 


2509 
2510 


012070 


170001 




SETF 





4 



MAlND£C-t l-DFfPB-A POP tl/ 3 4 FPP DIAGNOSTIC PART 2 MACU1 27( 1Q06) Q7»FEB-77 12:06 PAGE 47 





DFFP8A.P1 1 01 


•NOV-76 


21:06 


— • — 


T3 


LDCFD 


AND LDCDF TEST 






— — 


1 


i 


2511 

2512 


012072 


177420 


. — — 




HX9 : 


LDCDF 


( R0 ) + # ACO 


; TEST INSTRUCTION 




- ■ - ■ ■ — 


g 




2513 
2514 


012074 


020027 


013334 






CMP 


ROf »HXP2+10 


•WAS A bDOU 




— — , __. — 




t 


2515 
2516 


012100 
012102 


001402 
0001 37 


012712 






BEQ 
JMP 


HX10 


;C0NSTANT used 






« 


i 
1 


2517 
251 8 


01 2106 








HX 1 5 












i 

I 




2519 
2520 


012106 
012110 


170205 
012700 


013304 






STFPS 
MOV 


R5 

#HXDATQ# KU 










t 


2521 
2522 


012114 
012116 


170011 
174010 








SETD 
5TD 


ACO* (RO) 








I 


1 


2523 
2524 


012120 
012124 


012701 
012702 


013404 
000004 


— _____ — .. — 




MOV 

MOV 


#HXP8,Ri 
#4, R2 








g 




2525 
2526 


012130 
012132 


022120 
001 415 






HXllS 


CMP 
8EQ 


(Rl)+, (R0) + 
HX1 4 


JI$ IT CORRECT? 








4 


2527 
2528 


012134 


012701 


013374 






MOV 


f HXP7 # R 1 








i 


A 
1 


2529 
2530 


012140 
012144 


012700 
012702 


013304 
000004 




■— — — ——— - — 


MOV 
MOV 


#BXDATO,R0 
#4, R2 












2531 
2532 


012150 
012152 


022110 
001402 






HX12? 


CMP 

BEQ 


(El ) + # ( R0) 

HX1 i 


•DID FD FAIL TO GET 
JCOMPLIMbNlELif 








f 


2533 


012154 
012160 


000137 
077205 


013046 




HX1 3 : 


JMP 
SOB 


@|HXER6 
R2 , HX1 2 








< 


A 
1 


2535 
2536 


012162 


000137 


013076 






JMP 


(MHXER7 








i 




2537 
2538 


012166 


077220 






HX145 


SOB 


R2#HX11 










< 


2539 
2540 


012170 
01217 4 


012704 
020405 


000000 






MOV 
CMP 


#0,R4 
R4,R5 


?FPS CORRECT? 






t 


t 


2541 
2542 


012176 
012200 


001402 
0001 37 


013030 






BEQ 
JMP 


HX15 
##HXER8 




■ — — 




A 
1 




2543 
2544 










; TEST 


GR7 IMMEDIATE MODE CONSTANT 








1 


2545 
2546 


: 

012204 








HX15 5 












1 


i 


2547 
2548 


012204 


104413 








lipERR 




?SET UP THE LOOP ON 


ERROR 


ADDRESS, 


A 

-1 




2549 
2550 


012206 
012212 


012704 
170104 


000200 






MOV 
LDFPS 


#200, R4 
P4 


JSET FD 








1 


2551 
255? 


012214 
012222 


012737 
012737 


012232 
&L3_i26 


001236 
-J?_D_«L(LQ4 




MOV 
MOV 


#HX16 # @#$TMP2 
*HXER9,£#ERRVECT 








c 


A 
1 


2553 
2554 


012230 
012232 


005001 
177427 


043243 




HX 1 6 * 


CLR 
LDCFD 


Rl 

#5201 i ACO 








g 




2555 
25J5.6 ... 


012236 
01224X) . 


005201 

_0J£)52OJL 






HX165S 


INC 
INC 


Rl 
Rl 










1 


2557 
2558 


012242 
012244 


005201 
012737 


036646 


000004 




INC 

__j*oy___ 


Rl 

#CPSPUR, SIERRVECT 






i 


i 


2559 
2560 


012252 
012256 


020127 
001 402 


000003 




— — - 


CMP 
BEQ 


Rl,#3 
HX17 


;SEE IF PC WAS 
JC0RRECT 






A 

1 




2561 
2562 


012260 


000137 


013162 






JMP 


e#HXER10 










€ 


2563 
2564 


012264 
012264 


104413 






HX17: 


LpERR 




J SET UP THE LOOP ON 


ERROR 


ADDRESS. 


1 


4 


2565 
2566 


012266 


012704 


0002QO 






MOV 


I200-R4 








i 





MAIN06 C 


-ll-DFFPfi 


l«A 


PDP 11/34 FPP 


DIAGNOSTIC PART 


2 MACYU 27( 10063 


07-FEB-77 12S06 PAGE 4 


8 






DFFP6A. PI 1 01 


-N0V«76 


21 506 




T3 


LDCFD 


AND LDCDF TEST 






■ — - ry 

1 


* 


2567 

1MB _ 


012272 
0^2274 


170104 
012737 


012 322 


001236 




LOFPS 
MOV 


R4 

#HX18, §i$TMP2 






c 




2569 

_. 257ft . 


012302 
01 2306 


012700 
172410 


013364 




„„ 


MOV 
L»DD 


#HXP6,R0 

CRO), ACO 








i 
I 


2571 
2572 


012310 
012316 


0127 37 
012700 


036646 
01 3324 


000004 




NOV 

if r*i tf 

MOV 


#CPSPUR,MERRVECT 
#HXP2*R0 




J 1 

t 


4 


2573 
2574 


012322 


177410 






HX18 J 


LDCFD 


(RO),AC0 






( 




2575 
2576 


012324 
01 2330 


012700 
174010 


013304 






MOV 
STD 


#HXDATO# RO 
ACO, (RO) 


?Gt:T RESULT, 






£ 

1 


2577 
2578 


012332 
012336 


012701 
012702 


013374 

ft A A A A J| 

000004 






NOV 
MOV 


#HXP7, Rt 
#4,R2 






■ g 

i 


( 


2579 

2580 


012342 
012344 


022021 
001402 






HX19S 


CMP 

BEQ 


CR0)+, (Rl) + 
HX20 


?IS RESULT CORRECT? 




4 




2581 
2582 


012346 
012352 


0001 37 
077205 


012732 




HX20 ; 


JMP 

SOB 


##HXER2 
R2,HX19 








g 
A 


2583 
2584 










JTEST 


LDCFD WITH NEGATIVE OPERAND 




f 


I 


2585 
2586 


012354 
01 2354 


104413 






HX21S 


LPERR 




J SET UP THE LOOP UN ERROR 


ADDRESS. 


1 




2587 
2588 


012356 
012362 


012704 
170104 


000200 






MOV 
LDr PS 


#200, R4 

R4 








t 


2589 
2590 


012364 
012372 


0127 37 
012700 


012404 
013364 


001236 




NOV 
MOV 


#HX22 r i#$TMP2 
wHXPbf RO 






f 


4 


2591 
2592 


012376 
012400 


172410 
012700 


013344 






LDD 

±M n 13f 

MOV 


CRO),AC0 
lHXP4# RO 






< 




2593 
2594 


012404 


177410 






HX2 2 5 


LDCFD 


(R0),AC0 








1 


2595 
2596 


012406 
012412 


012700 
174010 


013304 






MOV 
STD 


IHXDATOf RO 
ACO, ( RO) 


;GET RESULT 






i 


2597 
2598 


012414 


012701 


013354 






MOV 


f HXPD i Hi 






i 




2599 
2600 


012420 
012424 


012702 
022120 


000004 




HX23 ? 


MOV 
CMP 


#4, R2 

CR1)+, (R0)+ 








g 

i 


2601 
2602 


012426 


001415 








BEQ 


HX26 






i 


t 


2603 
2604 


012430 

/V 4 ^ A ^ A 

012434 


012701 
012700 


013374 
013304 






MOV 
MOV 


#HXP7 # R1 
#BXDAT0,R0 






i 




2605 
2606 


012440 

A 4 "I A A A 

01 2444 


012702 
022120 


000004 




HX24 : 


MOV 
CMP 


#4, R2 

(Rl)t, (R0)+ 


JWAS SIGN INCORRECT 






i 


2607 
2608 


012446 
01 2450 


001 402 
000137 


013214 






BEQ 
JMP 


HX25 

£>#HXER11 






4 


i 


2609 
2610 


012454 
012456 


077205 
000137 


013234 




HX25! 


SOB 
JMP 


R2,HX24 

0#HXER12 






i 




2611 

261 2 


01 2462 


077220 


, 




HX26 5 


SOB 


R2,HX23 








1 


2613 
2614 










J TEST 


LDCFD 









i 


1 


2615 
2616 


12464 








HX27 ; 










c 




2617 
2618 


012464 
012466 


104413 
J 270.4 


A A ^fc A A 

QQ0?00 






LPERR 
MOV 


»200,R4 


?SET UP THE LOOP ON ERROR 


ADDRESS. 




1. 


2619 


012472 


170104 








LOFPS 


R4 






t 


1 


2621 
2622 


012474 


012700 
172410 


013314 






MOV 
LDD 


#HXP1,R0 
(R0),AC0 






< 



i 



MAINDEC 






PDP 11/34 FPP DIAGNOSTIC PART 


2 MACU1 27( 1006) 


07-FEB*77 12!0b PAGE 49 




DFFPBA*Pl i 01 


«NQV*76 


21506 T3 


LDCFD 


AND LDCPF TEST 






2623 


012502 


172010 




ADDD 


(RO) , ACO 






2625 
2626 


012504™" 
012512 


012737 
012700 


012516 001236 
013314 


MOV 
MOV 


#HX28, $#$TMP2 
iriXPl.RO 






2627 
2629 


012516 


177410 


HX285 


LDCFD 


(R0)f ACO 






2629 
2630 


012520 


170205 




STFPS 


R5 






2631 
2632 


012522 
012526 


012700 
174010 


013304 


MOV 
STD 


# HXDATO# RO 
ACO. (RO) 


j GET RESULT 




2633 
2634 


012530 


012701 


013314 


MOV 


*HXP1#R1 






2635 
2636 


012534 
012540 


012702 
022120 


000004 

HX29J 


MOV 
CMP 


I4.R2 

(Rl)+. (R0) + 


JIS IT 0? 




2637 
2638 


012542 
012544 


001402 
000137 


01 3264 


B£Q 
JMP 


HX30 

@#HXER13 






2639 
2640 


012550 


077205 


HX30! 


SOB 


R2f HX29 






2641 
2642 


012552 
012556 


012704 
020405 


000204 


MOV 
CMP 


# 204, R4 

R4, R5 


!FP5 CORRECT 




2643 
2644 


012560 

. .11,2562 


001402 
000137 


013012 


BEG 
JMP 


HX31 
a#HXER4 






2645 
2646 






STEST 


LDCFD 









2647 
2648 


012566 




HX31 ; 










2649 
2650 


012566 
012570 


104413 
012704 


000200 


LPERR 
MOV 


#200. R4 


jSET UP THE LOOP ON ERROR ADDRESS, 




2651 
2652 


012574 


170104 




LDFPS 


R4 






2653 
2654 


012576 
01 2602 


012700 
172410 


013364 


MOV 
LDP 


#HXP6 # R0 
(RO) # ACO 






2655 
2656 


012604 


012737 




012616 001236 


MOV 


#HX32. £#$TMP2 






2657 
2658 


012612 
012&16 


012700 
177410 


013314 

HX325 


MOV 
LDCFD 


#HXPl ,R0 
(RO).ACO 






2659 
2660 


012620 


170205 




STFPS 


R5 






2661 
2662 


012622 


012700 


013304 


MOV 


#HXDATO,R0 






2663 
2664 


012626 


174010 




STD 


ACO, (RO) 


;GET RESULT 




2665 
2666 


012630 
012634 


012701 
0127Q2 


013314 
000004 


MOV 
MOV 


IHXPlf Rl 
*4,R2 






2667 
2668 


012640 
012642 


022120 
001402 


HX335 


CMP 
BEQ 


(Rl )+ f (R0)+ 
HX34 


!IS IT ZERO? 




2669 
2670 


012644 
012650 


0001 37 
077205 


013264 

HX345 


JMP 
SOB 


§#HXER13 
R2.HX33 






2671 
2672 


012652 


012704 


000204 


MOV 


#204, R4 


?FPS CORRECT? 




2673 
2674 


012656 
012660 


020405 
0014Q* 




CMP 

BEQ 


R4,R5 
HX35 






2675 
2676 


012662 
012666 


000137 
000 1JJ 


013012 

013414 HX35: 


JMP 
JMP 


<a#HXER4 
BftHXDONE 






2677 
2678 






:ro incorrect 
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2679 



1 _ 


2680 


012672 


012737 


013330 


001242 


H X F« R 1 S 


NOV 


*HXp2+4,e*$TMp4 






0£ fli 

2681 
2682 


A 4 A T A A 

012700 
012704 


01 00 J / 

104234 


A A 4 <■% >| A 

001 240 




i$s 


unit 

wu V 
ERROR 


HU#^#5Jw"3 
234 




i ' 


2683 
2684 


012706 


A A A 4 •} "I 

000 137 


A 4 a /I 4 /i 

013414 






JMr 


Jo f nXDONL 




< 


26B5 
2686 


012/12 
012720 


a 4 

012/3/ 
010037 


A 4 111/1 

013334 
001240 


A A 4 A it A 

0012 42 


LI V C to C • 

HXER5 S 


it ^ 

MOV 


»nXP/+lO*t?*$l Mr ** 
ROf ##$TMP3 






2687 
2688 


012724 
012726 


1 04237 
000137 


013414 




i $ ; 


ERROR 
JMP 


237 

g#HXD0NE 






2689 
269Q 


012732 


012737 


013324 


001244 


jREPQRT 

HXER2? 


BAD DATA 
MOV 


#HXP2,i#$TMP5 




< 


2691 
2692 


0127 40 

012746 


012737 
012737 


013374 
013304 


001250 
001246 


HXER22 : 


MOV 
MOV 


IFHXP7, i#STMP7 
#HXDAT0,£#$TMP6 






2693 
2694 


012754 
012756 


104233 
000137 


013414 




1$ ; 


I"""* Tf-S. (f^t ^1 

EkROR 

JMP 


23 3 

§#HXD0NE 




i ■ 
i 


2695 
2696 


012762 


012737 


013324 


001244 


m 

HXER3: 


wov 


#HXP2,§#$TMP5 




€ 


"i £. ft 1 

269 7 
2698 


/\ 4 A *1 i "| 

012/70 
012776 


1 / / S 1 

012737 


A 4 1 * T /I 

013374 
013304 


A A 4 A £ A 

001 250 
001246 


HXER33S 


MOV 

MOV 


# MXr / # «?# S 1 MP / 
#HXDAT0.§#$TMP6 






2699 
2700 


01 3004 
013006 


4 A A 1 J* 4 

104441 

000137 


013414 




1 $ • 


ERROR 
JMP 


*?4 1 

#f HXDONE 




4f 

I 


A A * 

2701 
27Q2 


013012 


010537 


001240 




HXER4S 


MOV 


R5 f P#$TMP3 




« 


2703 
2704 


013016 
013022 


01043/ 
104240 


001242 




1$: 


it n u 
MOV 

ERROR 


DA A * ("TUD /l 

H4 » 1? f $ 1 MF4 

240 






2705 
27D6 


013024 


A A A 4 ^ *"1 

0001 37 


013414 






JMP 


A 4» O V 1% i \ ill 

PwHXDONE 




I 


2707 
2708 


013030 
013034 


A 4 A C ^ 1 

010537 
010437 


A A 4 a i A 

001240 
001242 




£_l w C* r\ £5 * 

HXER8 J 


MOV 
MOV 


R5 r f# $TMP3 
R4#£#$TMP4 




f 


2709 
2710 


013040 
013042 


104242 
000137 


013414 




1 $ S 


ERROR 
JMP 


242 

iiHXDQNE 






2711 
2712 


a* 5 a 4 i 

01 30 40 
013054 


A 4 ^1 1 1 

01273/ 
012737 


013324 
013404 


A A 4 *% A A 

001244 
001250 


HXER6 • 


MOV 
MOV 


#HXP2# §#$TMPa 
#HXP8 # ^#$TMP7 




g 
f 


271 3 
2714 


01 3062 
013070 


012737 
104244 


013304 


A A 4 A A 4L 

001246 


HXER66 S 

l$s 


u n \t 

MOV 
ERROR 


f HXDAIO, § I S T M r o 
244 




i 


A ^ 4 C 

2715 
2716 


A 4 5 A Tf A 

01 3072 


A A A i n 

0001 37 


A 4 *3 j4 4 Jl 

013414 






JMP 


«?#HXD0NE 






2717 
2718 


A 4 1 Alt 

01 3076 
013104 


A 4 fllll 

012737 
012737 


A 4 *5 ** A j4 

013324 
013404 


A A 4 A Jl rl 

001244 
001250 


l_l \£ IE? r% Tl * 

HXER7 ; 


MOV 
MOV 


#HXP2f §#$TMP5 
#HXP8 # ^#$TMP7 




M 
I 


2719 
2720 


013112 
013120 


012737 
104243 


013304 


001246 


1$: 


MOV 
ERROR 


# HXD AT0 f £#$ TMP6 
243 




1 


2721 
2722 


013122 


A A A 4 1 "7 

000137 


A 4 "i 4 4 A 

013414 






JMP 


(P#HXD0NE 






2723 
2724 


013126 
013132 


03/ / 1 o 
001005 


A A A A A 4 

000001 




HXER9 » 


BIT 
BNE 


* I # ( SP ) ? SEE I F 

1$ ? AN ODD 


T T 

ADDRESS 


1 


2725 
2726 


A 4 14 1/1 

013134 
013140 


A. A A T 4 

0227 1 o 
001402 


012236 


,, ... . 




CMP 
8E0 


f HXl65 f ( SP) 
1$ 




1 


till 
2728 


U 1 3 I *r £ 




A 3 £t A£. 

V 3 D O § 






tun 
JMr 








2729 
2730 


013146 
013152 


011637 
022626 


001236 




1$; 


NOV 
CMP 


(SP), ##$TMP2 
(SP)+f (SP)+ 




1 


2731 
2732 


013154 
CLD156 


104235 
000137 






2$: 


ERROR 
JMP 


235 

^•HXDONE 




1 


2733 
2734 


013162 


162701 


000003 




HXER105 


SUB 


#3,RJ 
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O 7 > C 

«f # 4 5 


A 1 31 A(> 
V 1 4 1 00 


U V O 3 VI i 










fi 1 
n * 


2736 


A 4 ^ t t /\ 

013170 


012702 


012236 








*HX105#H2 


nil 

a si 


1 j 1 / § 


A 1 A "5 7 
1 04 4 ' 


A A 1 14 1 

001 2** 2 






flu t 


Qi wi « it T M D <1 


2738 


013200 


4 £L A * A "i 

160102 








C* 11 


H 1 r R 2 


2739 
2740 


013202 
013206 


010237 
104236 


001240 




l $ : 


MOV 


R2###$TMP3 
2 36 


2/41 


A • *1 '1 4 A 

013210 


A A A i n 

0001 4 f 


A 4 "5 4 4 A 
01 44 1 ^ 






Tun 




2742 
















2743 


013214 


012737 


013344 


001244 


HXER11J 


NOV 


#riXP4 # @#$TMP5 


2744 


013222 


012737 


01 3354 


001250 




MOV 


# HXP5 # ^ # $ TMP7 


2745 
274o 


013230 
013234 


000137 
012737 


012746 
013 344 


a a 4 *S A A 

001 244 


n Atr, I £ • 


JMP 
MOV 


i|HXER22 

a u v b A att^ffunS 

fHXP4# PiSTMPd 


2 7 4 7 


A 4 J .1 "J 

01 4Z§2 


A 4 *3 7 "> 7 

I 4 1 3 f 


A 4 31CA 
01 44 


A A 1 OKA 




MU V 


#uync fiiiTUDl 
f FtArjf Pf PlfiF ' 


2748 


01 3250 


012737 


A i ^fc A\ Jk 

013304 


001246 




HOV 


^ j V ri 1 in fi ^ i* a T ii n C- 

iriXDATUf (PfSTMPO 


2749 
2750 


013256 
01 3260 


104245 
0001 37 


013414 




IS S 


ERROR 

l mi Pi 

JMP 


245 

§fHXDONE 


2751 
2752 


01 3264 


012737 


013314 


001244 


HXER1 4 : 


NOV 


1 HXP 1 r P# $TMp5 


2753 


1 4 2 7 2 


A 4 ! iT ^ 1 

01 2 f 4 / 


A 4 in A 

01431^! 


A A 1 'IK f» 

00 * 250 




unif 
"1U v 




2754 


013300 


000137 


01 2746 






Tun 

y MP 


PIHXKR22 


2755 
275b 


013 304 


000000 




— — — 


HXDATOS 







2757 


013306 


000000 













2758 


013310 


000000 













2759 


013312 


000000 













2760 
















2761 


013314 


000000 






hxpi: 







2762 


013316 


000000 













2763 
2764 


A 4 "i "3 Tl A 

01 4420 
013322 


A A A A A A 

000000 
000000 








A 







2765 
2766 


013324 


rt. J*v A t 1 1 

0005 7 7 






HXP2S 


C <t 1 

577 




*> *l f» 7 
2 r f 

2768 


A 1 lilt 
U I 4 4 40 

01 3330 


n m fo 

4 T T T T 'I 

177777 








i Tin 

4 *1 *l Tl *J 

177777 




"57£& 

4? r oy 


%}\ 3334 


I f f f to 








4 7 "I 7 "7 A 
1 f I f f 


■ 


2770 


013334 


005201 








5201 




* / ' 1 
2772 


1 5 4 io 
01 3340 


A A A A A A 

oooooo 

000000 








A 






_ — . — _ — - — , 


in 3 


0144*2 


A A A A A A 

oooooo 








A 






2774 


013344 


100577 






HXP4S 


100577 




one 

2775 


A 4 ? 1 At 

014 440 


1 / / 1 70 








4 imc 
1 / / / (O 




2776 


Q13350 


177777 








_L?7_777 




*i "7 "» "i 

2777 


01 3452 


1 7 # f 70 








1 / / / 70 




2778 


013354 


100577 






HXP5! 


4l A. V" i** 4* 

100577 




27 79 


1 4 4D0 


4 7 7 7 7 *» 








4 imt 

1 / / 1 1 




2780 


.._0 13 360. 


j*l 1% A #ti A 

oooooo 















A 4 U£1 

014402 


A A A A A A 

oooooo 






. . 


A 





2782 


QJJ3J4 








-H..X.P..6..i 


252 




*J "7 fi 3 


I 4 400 




— — — 


— — — 




1 20 454 


_ — — — . — ■ — ■ ■ ■ — ■ — — ■ 


2784 


013370 


4 ^ t It 1 

125252 








125252 




2785 


013372 


125252 








125252 




2786 
















278? 


013374 


000577 






HXP7 ! 


577 




2789 


013.376 


177776 








177776 




2789 


013400 


oooooo 













2790 


.013402 


oooooo 














>1AINP£C 


-11-DFFPB 


» A 


PDP 11/34 FPP 


DIAGNOSTIC PART 2 


MACK 1 1 27(1006) 07-FEB-77 12:06 PAGE 52 




3FFP8A.P11 Ot 


•NQV-76 


21:06 




T3 


LDCFD AND LDCDF TEST 




279! 
2792 


013404 
013406 


000577 
177777 






HXP8 " 


577 

177777 


: ,. „ : ___ — 




2793 
2794 


013410 
013412 


000000 
000000 

















2795 
2796 


013414 









HXDONE: 


~ ~ 




2797 
279$ 


013414 


104412 








RSETUP 


jGO INITIALIZE THE FPS AND STACK? AND 
?SEE IF THE USER HAS EXPRESSED 




2799 
2800 














; THE DESIRE TO CHANGE THE SOFTWARE 

? VIRTUAL CONSOLE SWITCH REGISTER (HAS 




2801 
2802 














? THE USER TXPED CONTROL G? ) . 




2803 
2804 


2805 
2806 














2807 
2808 










;*TEST 
* w 


4 


CMPD TEST 




2809 
2810 










J*THIS IS A TEST OF THE CMpp INSTRUCTION, NOTE THAT A SUBROUTINE 
;#IS USED TO SET UP OPERANDS, EXECUTE THE INSTRUCTION AND CHECK THE 




2811 
2812 










?*RESULTS 
% * 






2813 
2814 


013416 


000004 






• •#*#############################*##*#*#*#***#*##*#*##*#*###***»# 

TST4 ! SCOPE 




2815 

2816 










* TEST 


THc, CinPU 


INSTRUCTION *li .ln I r 5Hv- — — w J 




2817 
2818 


013420 
013420 


104413 






AAA1 ; 


LPERR 


JSET UP THE LOOP ON ERROR ADDRESS, 




2819 
2820 


013422 
013426 


004737 
000000 


014232 
000000 


oooooo 


is: 


JSR 
.WORD 


PC,§#CMPSUB 

0,0*0*0 j ACO 




2821 
2822 


013434 
01 3436 


000000 
000000 


000000 


oooooo 


2$; 


.ftfORD 


0,0,0,0 ;FSRC 




2823 
2824 


013444 
013446 


000000 
000200 






3$: 


200 


?FPS BEFORE EXECUTION 




2825 
2826 


013450 
013452 


000204 
000200 








204 
200 


?FPS AFTER EXECUTION 
? ERROR FPS 




2827 
2828 


013454 


104001 






4$: 


ERROR 


1 ;FPS ERROR 




2829 
2830 










l TEST 


CMPD WITH 


(AC-0) AND FSRC POSITIVE. 




2831 
2832 


013456 
013456 


104413 






A A A 2 • 


LPERR 


;SET UP THE LOOP ON ERROR ADDRESS. 




2833 
2834 


013460 
013464 


004737 
000000 


014232 
000000 


oooooo 


1$: 


JSR 
„ wORD 


PC,e#CMPSUB 

0,0,0,0 % AC 




2835 
2836 


013472 
013474 


000000 
025252 






2$; 


25252 


JFSRC 




2837 
2838 


013476 
013500 


052525 
125252 








52525 
125252 






2839 
2840 


013502 
013504 


052525 
000200 






3$S 


52525 
200 


;FPS BEFORE EXECUTION 




2841 
2842 


013506 
013510 


000200 
000210 








200 
210 


?FPS AFTER EXECUTION 
; ERROR FPS 




2843 
2844 


013512 


104003 






4$S 


ERROR 


3 ?FPS ERROR 




2845 
2646 


013514 








; TEST 
AAA3 : 


CMPD WITH 


(AC=0) AND FSRC NEGATIVE 
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I 


* p *i 1 


n i Kid 


1 a 4 4 1 i 

I V *t ** JL 3 














•SET UP 


THE LOOP ON ERROR ADDRESS. 


2848 


013516 


004 7 37 


At A 1 A 

014232 






ICQ 

U5R 













/o 49 


a « icon 


A A A A A A 

ooouuu 


A A A A A A 


AAA A A A 


4 6* 

15 1 


linen 


A A A A 










2850 


013530 


000000 


















1 


2851 


013532 


125252 






2$: 


125252 








JFSRC 




2952 


013534 


125252 








125252 












2853 


013536 


052525 








52525 










1 


2854 


01 3540 


1 25252 








125252 












2855 


013542 


000200 






3$: 


200 








?FP$ BEFORE EXECUTION 




2856 


013544 


0002 1 








210 








J FPS AFTER EXECUTION 


| 


2857 
2858 


013546 
013550 


000200 
104004 






A #t > 

4$ : 


200 

IT* n fl »~\ T*i 

KRROR 


4 






? ERROR FPS 
?FPS ERROR. 




#859 
2860 










* -T* C* 4 

? 1 c»5T 






ft 


POSITIVE 




O ft £v 4 

/oO 1 

1^ fi £ A 

2862 


01 3552 


10441 3 






» a K A • 








?SFT UP 


THE LOOP ON ERROR ADDRESS. 


t 


2863 
2864 


013554 
1 3560 


004737 
0/3/5/ 


014232 




4 * • 

is: 


JSR 

■5 K *> K O 
43/34 


PC,§*CHPSUB 






J AC 




/ 865 


V J 4 5 4 


U3/3/3 








3/3/3 


— 








i 


2866 


a * *a c c a 

013564 


125252 








1 / 5 / 5 / 












3 & 7 
/ SJ ?> A 


Ul jjOO 


AC 5«E OCi 








R 5 C > C 
3/3/3 


—— — — - 










2868 


1 3570 


A- *\ A A /I A 

000000 


000000 


ft /\ /V A /V 

oooooo 


2$ • 




A A A A 

0» Of 0« 






JFSRC 


t 


2869 
2870 


013576 
01 3600 


000000 

A A A *1 A A 

000400 






t 

5$ • 


A A 
400 








JFPS BEFORE EXECUTION 




2871 


013602 


000210 








210 








;FPS AFTER EXECUTION 


1. 


2872 


01 3604 


000200 








200 








? ERROR FPS 




2873 




I HU03 




— — 






3 






?FP$ ERROR 




2874 






















I 


2875 
2876 










J TEST 


v,MPP WITH 


Cr5Rt.'-'Uj ANP 




NEGATIVE 


1 


* O f / 
^ a i o 
2878 


A 4 A 
A 4 ^ »» 1 A 

013610 


1 044 1 i 






c» .r* w iJi • 








5 SKI UP 


THE LOOP ON ERROR ADDRESS, 




2879 


013612 


004737 


014232 






JSR 


PC, ##CMPSUB 










2880 


A 4 1 t. 1 il 

013616 








I $ S 


4 unco 
1/5/34 








?AC 


1 


/»» 1 

/"» rt n 

2882 


01 3&22 


1 1 C» ') C "5 

/A £T ^ C ^ C 

052525 








* 43/3/ 

c ^ c *^ c 
525/5 












3ftfl 3 


A 1 2 A34 

M J: -J v 4 ** 










( t J * J 4 


— — 








f 


2884 


01 3626 


/\ /* /\ f\ J% i\ 

oooooo 


oooooo 


i\ j\ f\ i% j\ fx 

oooooo 


2$ * 


.WORD 


A A A A 

Of Of Of 






?FSRC 




2885 
2886 


Q 1 J D 5 4 
013636 


A A A A A A 

oooooo 

000200 






3$ ; 


PS J\ f\ 

200 








fFPS BEFORE EXECUTION 


i 


2887 


013640 


000200 








200 








JFPS AFTER EXECUTION 




2888 


013642 


000210 








210 








j ERROR FPS 






Al It Ad 








AC* 


DflR 


o 






?FPS ERROR 


1 _ 


2890 
























Q Q Q 4 

* CJ 7 1 





— 






; i to i 


Cpiru ffiiri 


HV. rUOllllL 


h H T) 


FSRC NEGATIVE 




2892 . 


013646 








AAA6 * 












% 


/©? J 

n A A A 

2894 


A 4 ^ e a 

01 3050 


1 A 4 A 1 * 
1 V *** 1 3 

004 737 


014232 







tTpfrr 

ICQ 


, . 




?SET UP 


THE LOOP ON ERROR ADDRESS, 




4895 


a i uca 
Ml 3 03 


AC *}C AC 






15 5 


3 4 3 4 3 




— 




;AC 


I 




A 1 ^AC4 
VI J V? J o 


1 3 s * 9 s * 3 
4 4 3 4 3 4 








1 3<i^«>3 
1 i( J t J £ 












2897 


013660 


052525 








52525 












2898 


013662 


125252 








125252 










c 


2899 


013664 


125252 






2$; 


125252 








? ;FSRC 




2900 


013666 


052525 








52525 












2901 


013670 


125252 








125252 










c 


2902 


013672 


052525 








52525 













4AINDEC 


-11-DFFPfc 


*A 


PDP 


11/34 


FPP DIAGNOSTIC PART 2 


MACm 27(1006) Q7-FE8~77 12*06 PAGE 54 




IP 


)FFP8A.Pll Oi 


»NU V» 1 6 


* * • 


06 


T4 


CHPO TEST 


_ _ r 


1 _ 


2903 

2904 


013674 
013676 


000200 
000210 






3$; 


200 
210 


JFPS BEFORE EXECUTION 
?r_r£> ArllLK tAtlUTlUN 


4 




2905 
2906 


013700 
013702 


000200 
104007 






4$ 5 


200 
ERROR 


? ERROR FPS 

7 JrPS LKKUK 




i 

i. 


29(17 
2908 
















i 


i 


2909 
2910 


01 3704 








JTEST 
AAA7 S 


CMPDHrflTH 


AC NEGATIVE AND FSRC POSITIVE 


i 




2911 
2912 


013704 
013706 


104413 
004737 


014232 




LPERR 
JSR 


?SET UP THE LOOP ON ERROR ADDRESS, 

PC 9 H*f CMP5UB 




j 1 
t 


2913 
2914 


013712 
013714 


1 25252 
052525 






1$S 


125252 

52525 


?AC 

_____ — ,_ — _________________ . , ; , ; 


# 


i 


2915 
2916 


013716 
013720 


125252 
052525 








125252 
52525 




< 




2917 
2918 


013722 
013724 


052525 
125252 






2$; 


52525 
125252 


SFSRC 




I 


2919 
2920 


013726 
013730 


052525 
125252 








52525 
125252 




g 

i 


4 


2921 
2922 


013732 
01 3734 


000200 
000200 






3$: 


200 
200 


?FPS BEFORE EXECUTION 
?FPS AFTER EXECUTION 


i 




2923 
2924 


013736 
01 3740 


000210 
104010 






4$ ; 


210 
ERROR 


j ERROR FPS 

10 ?fPS ERROR, 




g 


2925 
2926 










; TEST 


CMPD IrflTH 


AC POSITIVE AND FSRC POSITIVE 


g 

1 


f 


2927 

2928 


013742 


IIH 






? AND 
AAA8 % 


EAC LESS THAN EF5RC ♦ 


i 




2929 
2930 


013742 
013744 


104413 

004737 


014232 




LPERR 
JSR 


jSET UP THE LOOP ON ERROR ADDRESS. 

PC,§#CMPSU6 




1 


2931 
2932 


013750 
013752 


1 2345 
067654 






1$: 


12345 
67654 


?AC 


t 


1 


2933 
2934 


013754 
01 3756 


032101 
023456 








32101 
23456 




t 




2935 
2936 


013760 
013762 


023456 
076543 






2$: 


23456 
76543 


?FSRC 




g 

1 


2937 
2938 


013764 
013766 


021012 
034567 






— — 


21012 
34567 




1 


t 


2939 
2940 


013770 
013772 


000200 
000200 






3$: 


200 
200 


JFPS BEFORE EXECUTION 
J FPS AFTER EXECUTION 


< 




2941 
2942 


013774 
01 3776 


000210 
104011 






4$: 


210 
ERROR 


; ERROR FPS 

11 ?FPS ERROR 




1 


2943 
2944 
















1 


1 


2945 
2946 


014000 








; TEST 
A A A 9 • 


CMPD WITH 


AC POSITIVE, FSRC POSITIVE AND EAC GREATER THAN EFSRC 


1 




2947 
2948 


014000 
014002 


1 A ji A 1 _- 

10441 3 
004737 


014232 




LPERR 
JSR 


f SET UP THE LOOP ON ERROR ADDRESS. 

PCf £#CMPSUB 




1 


2949 
2950 


014006 
014010 


045676 
054321 






1$S 


45676 
54321 


?AC 


1 


€ 


2951 
2952 


014012 
014014 


01 2345 
067654 






______ 


12345 
67654 




C 




2953 
2954 


014016 
014020 


034567 
065432 






2$: 


34567 
65432 


;FSRC 




i. 


2955 
2956 


014022 
014024 


101234 
056765 








101234 
56765 




| 


1 


2957 
2958 


014026 
014030 


000200 
000210 






3$: 


200 
210 


;FPS BEFORE EXECUTION 
? FPS AFTER EXECUTION 


C 



E 



f&INDEOl 1»DFFPB»A 



>FFpBA.Pli 



PDP 11 /34 FPP P1AGN OSTIC PART 2 MAC ¥1 1 2 7 ( 1.00 6J 
01-NOV-76 21S06 T4 CHPD TEST 



07-FEB-77 12s06 PAGE 55 



"C 



2959 


A 4 1 

01403^ 


A A A O A A 

Q00 2 00 






200 




» CDCinD CD Q 
ftHKUH fro 




2960 


014034 


4 A 4 A 4 ft 

104012 




4$ 5 


ERROR 


4 ^ 

1 2 






O O £. 4 

2962 








; TEST 


CMPD NITH 


AC POSITIVE, 




r SRC POSiTlVt, ANP AL bQU AL TO r SKv. 


™_ , 


2964 


01 *0 40 

014036 


4 A 4 4 4 i 

1 04413 




AAA1 : 

IiPERR 




J&fci Ur Inc. JLiUUr UN tKKUK AUUKtoo „ 


_ — . 




A 4 A A A A 
01 *0*0 


00* fit 


A 4 Alio 

01*242 




TOD 






— » . 


2966 


A 4 A A A A 


A 4 5 1 4 C 




1$ : 


12 345 








2967 


014046 


067012 






67012 








2968 


A M M F A 

01 4050 


034567 






34567 








2969 


01 4052 


A 4 1 1 * C 

01 2345 






012345 









2970 


01 4054 


01 2345 




2$ 5 


12345 




■ C 4T"* f 

J r SRC 




*5 Q T € 

<y / 1 


1 *U.>0 


00 / 1 4 






67012 








2972 


01 4060 


034567 






34567 








297 3 
2974 


A 4 A 1 

01 4062 

A 4 A A £. A 

01 4064 


A 4 I'JIC 

012345 
000200 




3$ ; 


012345 
200 








2975 


014066 


000204 






204 




;FPS AFTER EXECUTION 




2976 


0i4p7Q 


000200 






200 




a PBOflO CDC 

*LKKUK Pro 




2977 


014072 


104013 




4$ • 


ERROR 


13 


;FPS ERROR 




2978 


















2979 


— 






?TEST 


CMPD WITH 


AC POSITIVE* 


fCDf on^TTT VR. FhC FOII A I. Tfl F IT <i B T . 




2980 








t AND 


FSRC GREATER THAN AC, 






2981 

AAA A 

2982 


014074 

a 1 A ft T A 

01 4074 


4 A A A « ^ 

104413 




H A K 4 4 

AAA 1 1 


5 

LPERR 




"oc-I U" 1 rlE, LUUr UN C.KKUK AUUKtoOg 




29t» 3 
2984 


A 4 d rtTt 

0140/0 

ft 4 4 4 A **i 

014102 


A A A 1 1 "7 

00* / 3 / 

A 4 11 iC 

012345 


A 4 A ^ ^ *S 

01*2 42 


1$ S 


USR 
1 2345 


ra/"» a«r*iincii& 
PL t ^fCMPSUB 


? "V, 




2985 


014104 


067012 






£ A 4t *% 

67012 








2986 


A -4 A 4 A Jl 

014106 


034567 






34567 








TOO! 

2988 


A 4 A f 1 A 

014112 


A 4 HAS 
1 4 3 *5> 

012345 




2$ ; 


012345 
12345 




J r SRC 






A 4 A 1 1 A 

01*11* 


A 1 A 1 r i U 






70123 








*\ ft ft +L 

2990 


014116 


'S A C i 1 A 

045O70 






45670 








2992 


A 4 A 4 *5 A 
I * I 4V 

014122 


4 O 3 A K 

12 3*50 

A A A 1 A A 

000200 




3$ ? 


123456 
200 




# P PS otp ORE EXECUTION 




2993 


014124 


000200 






200 




?FPS AFTER EXECUTION 




2994 


0H126 


000210 






210 




* tuna pne 

ybPRUR f PS 




2995 


014130 


104014 




4 $ S 


ERROR 


14 


?FPS ERROR 




2,i56 .. 


















*5 Q Q 1 









_ <*ri t* #*f m 

? TEST 


CMPD NITH 


AC POSITIVE, 


peon DflCTf rV6' (TAT FAI1&T Tfl FET'CDf . 




2998 








: AND 


AC GREATER 


THAN FSRC . 






*i ft ft a 5 ! 

2999 
3000 


A 4 4 4 5 1 

014132 
014132 


104413 




AAA! 2 


• 

• 

LPERR 




;SET UP THE LOOP ON ERROR ADDRESS. 




3001 

3002 


014134 
01 41 40 


004737 
054321 


014232 


1$ : 


JSR 
54321 


PC, ##CMPSUB 


.._ ? AC 




3003 


A 4 A 4 y| 1 

0141*2 


A T A. C A i 

/0£>*4 


„ 




76543 








3004 


0141 44 


A *\ <• AT/ 

021076 






21076 








■3 ft A C 


A 4 A 4 A 

01*1*0 


A C A 3 *"» 4 
03*421 






54321 








3006 


QH15Q 


_Q5_432_L_ 


" — 


2s : 


54321 




; FSRC 




4Q0 / 


A 4 A 4 C 1 

014132 

A 4 A 4 C A 

1 * 1 !>* 


ft t. C /1 i 1 
003*32 

4 A *> 6* C A 

10 /OS* 






65432 
107654 








3009 


014156 


032107 






32107 








3<0Q 


014160 


000200 




3$; 


200 




JFPS BEFORE EXECUTION 




3011 


014162 


000210 






210 




;FPS AFTER EXECUTION 




30U 


014164 


000200 






200 




? ERROR FPS 




3013 


014166 


104015 




4$: 


ERROR 


15 


;FPS ERROR 




3014 



















4 



c 



{ 



IAINDEC 


-11-0FFP8 


*A 


POP 11/34 


FPP DIAGNOSTIC 


PART 2 


MACY11 27(1006) 


07-FEB 


•77 12506 PAGE 56 






)FFPBA.Plt 01 


•NOtf »76 


21:06 


T4 


CMPD TEST 












3015 
3016 








?TEST CMPD WITH 
I AND AC GREATER 


AC NEGATIVE, FSRC NEGATIVE, EAC EQUAL TO EFSRC t 
THAN FSRC 






3017 
3018 


014170 
014170 


104413 




AAA 1 3 : 

— .... „,,„,_ 


LPERR 






; SET UP 


THE LOOP ON ERROR ADDRESS. 






3019 
3020 


014172 
014176 


004737 
112345 


014232 


1$ : 


<JSR 
112345 


PC, 


glCMPSUB 




; AC 






3021 
302? 


014200 
014202 


043210 
076543 







43210 
76543 














3023 
3024 


014204 
01 4206 


021076 
112345 




2$S 


<)l Alt 

112345 








jFSRC 






3025 
3026 


1 44 1 

014212 


054321 
007654 






54321 
07654 














3027 
3028 


014214 
014216 


032107 

Aflftl Aft 

000200 




3$: 


32107 
200 








JFPS BEFORE EXECUTION 






3029 
3030 


014220 
014222 


000210 
000200 






210 
200 








JFPS AFTER EXECUTION 
; ERROR FPS 






3031 


014224 


104016 




4$: 


ERROR 


16 






JFPS ERROR 







3033 

3034 014226 000137 014422 JMP @ f AAADONE * FINISHED CMPD TEST . 



3035 
3036 



3037 J 

3038 ! 


ITHIS SUBROUTINE, CMPSUB, IS CALLED TO SET UP, EXECUTE 
j AND CHECK THE RESULTS OF A CMPD INSTRUCTION, 


3039 ! 

3040 I 


j IT IS CALLED THUS; 


3041 
3042 


f JSR PC#S#CMPSUB 

f ACARG: .WORD X,X,X,X ?AC OPERAND 


3043 1 

3044 ! 


f FSRCARG; .WORD X,X,X,X jFSRC OPERAND 

f FPSBS .WORD X sFPS BEFORE EXECUTION 


3045 ! 

3046 2 


f FPSA? • WORD X ;FPS AFTER EXECUTION 
r FPSE; . WORD X ; ERROR FPS 


3047 ; 

3048 1 


f ERRS ERROR X ?FPS ERROR 

1 CONT; * RETURN ADDRESS 


3049 S 
3050 


THE OPERANDS ARE SET Up (USING AGO FQR THE AC OPERAND). THEN 


3051 ; 

3052 ! 


;FPSB IS LOADED INTO THE FPS. THE INSTRUCTION, CMPD, IS EXECUTED. 

\ AFTER THE EXECUTION THE FPS IS CHECKED AGAINST FPSA. IF IT IS A MATCH 


3053 1 

3054 J 


! THEN THERE WAS NO ERROR AND CONTROL IS RETURNED TO CONT. IF 

'THE FPS IS INCORRECT IT IS COMPARED WITH FPSE IN AN ATTEMPT TO ANALYSE 


3055 ! 

3056 ! 


» THE FAILURE. IF THE FPS IS THE SAME AS FPSE THEN CONTROL IS 
•RETURNED TO THE ERROR CALL AT LOCATION ERR, IF THE FPS WAS 


3057 1 

3058 ; 


' NOT CORRECT BUT DIDN'T MATCH FPSE A GENERAL ERROR 1$ REPORTED 
■ AND CONTROL IS PASSED TO CONT, 



3059 

3060 014232 012601 CMPSUb: MQV (SP) + ,R1 ;PICK Up A POINTER TO THE 



3061 ; ARGUMENTS » 

3062 014234 016100 000020 MQV 20(R1),R0 * GET THE FPS BEFORE EXECUTION, 

3063 014240 170100 LDFPS RO ; LOAD IT INTO THE FPS. 

3064 

3065 014242 012737 014264 001236 MQV #l$,@#$TMP2 ;SAVE ADDRESS OF CMPD INSTRUCTION . 

3066 014250 010100 MQV R1,R0 ;GET ADDRESS OF AC OPERAND. 

3067 014252 172410 LDD (R0),AC0 ; LOAD ACO OPERAND 

3068 , 

3069 014254 010100 MOV R1,R0 ;COMPUTE FSRC OPERAND 

3J> 70 01 4256 062700 Q00Q10 ADD »10,R0 ? ADDRESS 





IAINDEC 


-H*DFFPe 


l~A 


PDP 1 1/34 FPP 


DIAGNOSTIC 


PART 2 


MAC ¥11 27( 1006) 


07- 


FEB-77 12506 PAGE 57 


, _.~ ., — ___ 




>FFPBA,Ptl 01 


«N0V*76 


21 ;06 




T4 


CMPD TEST 






L 


i 


3071 

MJ2 


014262 


000240 








HOP 






JFOR SCOPING. 


< 




3073 
3074^ 


014264 


173410 


_„___, : 




1 $ : 


CMPD 


(R0),AC0 




jEXECUTE TH& TEST INSTRUCTION. 




i 


3075 
3076 


014266 


170205 


. 






STFPS 


R5 




jSAVE FPS AFTER INSTRUCTION, 


f 


i 


3077 
3078 


014270 


016104 


000022 






MQV 


22(Rl)*R4 




?GET EXPECTED FPS. 

MF INCORRECT SET UP FOR 


< 




3079 
3080 


014274 
014300 


010137 
010137 


001240 
001242 






MOV 
MOV 


R1,@#$TMP3 
Rl $ a#$TMP4 




;AN ERROR CALL. 




t 


3081 
3082 


014304 
014312 


062737 
010537 


000010 
001244 


001242 




ADD 
MOV 


#10, §#$TMP4 
R5, i#$TMP5 






f 


i 


3083 
3084 


014316 
014322 


010437 
020405 


001246 






MOV 
CMP 


R4*§#$TMP6 
R4,R5 




; WAS FPS CORRECT? 


1 




3085 
3086 


014324 


001410 








8EQ 


3$ 




? BRANCH IF YES. 




i 


308? 
3088 


— . — — 
014326 


026105 


_____ 

000024 








cmp 




24(R1 ) , R5 




?WAS THE FPS THE SAME 


g 
1 


1 


3089 
3090 


014332 


001003 








BNE 


2$ 




• ft C f>OC C V Ti tT> /"» 1* ET : IN T U^flDlJC'/'T COCO 

\ AS THE EXPECTED INCORRECI rPSr 
; BRANCH IF NO MATCH. 


1 




3091 
3092 


014334 


062701 


000026 






ADD 


#26 f Rl 




I IF THE EXPECTED INCORRECT 




t 


3093 
3094 


014340 


000111 








JMP 


(Rl ) 


?FPS 


MATCHED THE RESULTANT r PS 

; RETURN TO THE ERROR CALL 


% 


f 


3095 
3096 


















jIN THE CALLING ROUTINE, 


1 




3097 
3098 


014342 
014344 


104001 
000411 






2$ ; 


ERROR 
BR 


1 

5$ 




JOTHERWISE REPORT INCORRECT FPS 




I 


3099 
3100 


01 4346 


012700 


014412 




3$; 


MOV 


#CMPTMP, RO 




?IF FPS WAS CORRECT MAKE SURE 


g 


t 


3101 
3102 


014352 
014354 


174010 
010102 








STD 
MOV 


ACO,(RO) 
Rl ,R2 




;AC0 WAS NOT AFFECTED Bi CMPD, 


i 




3103 
3194 


014356 
014362 


012703 
022220 


000004 




4$; 


MOV 
CMP 


#4,R3 

(R2)r f (R0)+ 








i 


3105 
3106 


014364 
01 4366 


001003 
077303 








BNE 
SOB 


6$ 

R3, 4$ 






f 


t 


3107 
3108 


01 4370 


000161 


000030 




5SS 


JMP 


30CR! ) 




; RETURN 


t 




3109 
3110 


014374 








6$: 








? REPORT ACO MODIFIED BY CMPD 




1 


3111 
3112 


014374 
014400 


010137 
012737 


001240 
014412 


001242 




MOV 
MOV 


R!,tM$TMP3 
ICMPTMP, @#$TMP4 






€ 


1 


3113 
3114 


014406 
01 4410 


104002 
000767 






7$; 


ERROR 
BR 


2 

5$ 




J RETURN 


* 




3115 
3*16 


01441 2 


000000 


000000 


oooooo 


cmptmp; 


.WORD 


0,0,0, 








1 


3117 
3119 


014420 


000000 
















f 


€ 


3119 
3120 






— — — 














C 




3121 
3122 


014422 
014422 


104412 






aaadqne? 


RSETUP 




?G0 


INITIALIZE THE FPS AND STACK? AND 




i 


3123 
3124 
















?SEE 
;THE 


IF THE USER HAS EXPRESSED 
DESIRE TO CHANGE THE SOFTWARE 


c 



3125 



; VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;TH£ USER T¥PEP CONTROL G? ) . 



I 



X 



1AI N DEC«* 1 1»DF FPB»A 
IFFPBA.PII 



0i-NOV»76 aisos 



PDP 11/ 34 F PP DIAGNOSTIC PART 2 MAC ill 27 £1.00 b) 

T4 CMPO TEST 



Q7*FEB-77 12:06 PAGE 58 



3127 
3128 



3129 
11M 



3131 



•####*#### #V####*###^ 



3133 
3134 










?* 

;*THIS 


IS A TEST OF THE DIVD 


INSTRUCTION WITH A 




3135 










;#ZER0 


DIVISOR, 


THE CONDITION 


IS CHECKED WITH BOTH 


— — „ — 


3136 










S*TRAP 


ENABLED 


AND TRAPS DISABLED. 




3137 
3138 










»# 

• • ####*#######♦##**######## #^ 


__ 


3139 


01 4424 


000004 






TST55 


SCOPE 








3140 




















3141 










J FIRST 


TEST DIVD WITH CFSRC=AC=0) AND TRAPS DISABLED. 


. — . > 


3142 


014426 


10441 3 








LPERR 




JSET UP THE LOOP ON ERROR ADDRESS, 




3143 
3144 


014430 


012704 


A. /t A ^ A A 

040200 




BBB05 


MOV 


#40200, R4 


?SET UP FPS 

f WITH INTERRUPTS 


; ; _.. 


3145 










— — — 






? DISABLED, 




3146 


014434 


4 a «t A it 

170104 








LDFPS 


R4 






3147 


014436 


0127 37 


01 4700 


000244 




NOV 


*BBBER1,§#FPVECT?SET UP FOR ANY FP INTERRUPTS. 




3148 


*\ 4 1444 

01 4444 


012 737 


014464 


001236 




MOV 








3149 


014452 


012700 


015104 






MQV 


f BBBP1 , RO 


?SET UP ACO - 




3150 


01 4456 


172410 








liDD 


(R0),AC0 






3151 


A 4 A A & A 
Q 1 4 3 


At O *J A 1 
01 4 f 01 


A 4 C 4 A A 
1 □ 1 04 






MOV 


#BBBP1 # Rl 


SrSRC " 




3152 




















3153 


014464 


174411 






BBBH 


DIVD 


(Rl ) , ACO 


_ 

JTEST INSTRUCTION 




3154 




















3155 


01 44oo 


1 /0i05 








STFpS 


R5 


m £~ rr* erst? 

•GET r PS 





3156 


014470 


170303 








STST 


R3 


?G£T FEC 




315 7 
3158 


014472 


012704 


1 40204 






MO* 


#140204, R4 


; EXPECTED FPS. 




3159 


014476 


020405 









CMP 


R4,R5 


?IS FPS CORRECT, 




3160 


014500 


001 1 31 








8NE 


BB8ER2 


?IF INCORRECT BRANCH, 




3161 
3162 


01 4502 


012702 


a it y\ a jt 

000004 






NOV 


#4,R2 


? EXPECTED FEC, 




31 fc>3 












CMP 


R2,R3 


,»IS FEC CORRECT? 




3164 


014510 


001 1 40 








BNE 


B8BER 3 


j IF INCORRECT BRANCH. 




3165 
3166 










? TEST 


DIVD WITH 


(FSRC=0) AND 


TRAPS DISABLED, 




J 1 o 7 


A 4 A IS 1 O 








B6B2: 










3l£8 


014512 


104413 








LPERR 




JSET UP THE LOOP ON ERROR ADDRESS • 




3169 


014514 


012704 


040200 






MOV 


#40200, R4 


? LOAD FPS WITH TRAPS DISABLED. 




3170 


014520 


4 m /N 4 J** Jl 

170104 








LDFPS 


R4 






3171 
3172 


014522 


012737 


014542 


001236 




MOV 


#BBB3,@#$TMP2 






3173 


014530 


012700 


015114 






MOV 


#BBBP2,R0 


;SET UP ACO OPERAND (NON ZERO), 




3174 


014534 


172410 








LDD 


CRO), ACO 






3175 


014530 


012700 


015104 






MOV 


#BBBP1,R0 


?FSRC-0 




3176 


014542 


174410 






B6B3: 


DIVD 


CRO), ACO 






3177 
3178 


014544 


170205 








STFPS 


R5 


? GET FPS. 




3179 


014546 


170303 








STST 


R3 


?GET FEC. 




3180 




















3181 

3182 


014550 
014554 


012704 
020405 


140200 






MOV 
CMP 


#140200, R4 
R4,R5 


j EXPECTED FPS. 
;IS FPS CORRECT? 





IAIN DEC 


•11 »DFFPB*A 


POP 11^34 FPP 


DIAGNOSTIC PART 


2 


MAC If 11 27(1006) 


07-FEB-77 12:06 PAGE 59 


■FFPBA.Pll 01 


*N0V-76 


21S06 




T5 


DIVD 


WITH (FSRC=G) AND 


(BUT FD) TEST 


3183 
3184 


014556 


001102 








BNE 




BBBER2 


j IF INCORRECT BRANCH, 


3185 
3186 


014560 
01 4564 


012702 
020203 


000004 


— — — — — 




MOV 
CMP 




#4, R2 
R2,R3 


; EXPECTED FEC . 
jWAS FEC CORRECT? 


3187 
3188 


014566 


001111 









BNE 




BBBER3 


;IF INCORRECT BRANCH, 


3189 
319Q 


01 4570 








? TEST 
8BB4? 


DIVD WITH 


FSRC=0) AND TRAPS ENABLED, 


3191 


014570 
014572 


104413 
012704 


000200 






LPERR 
MOV 




#200, R4 


;SET UP THE LOOP ON ERROR ADDRESS. 
;SET UP EPS, TRAP ENABLED, 


3193 
3194 


014576 


170104 








LDFPS 




R4 




3195 
31 96 


014600 
01 4606 


012737 
012700 


014626 
015114 


001236 




MOV 
MOV 




#8BB5,g#$TMp2 
#B8BP2, RO 


jSET UP ACQ OPERAND ( NON ZERO), 


3197 
3198 


0H612 


172410 




— , — , 




LDD 




(R0),AC0 




3199 
3200 


014614 
014622 


012737 
012700 


014634 
015104 


000244 




MOV 
MOV 




#BBB6f ilFPVECT 
#BBBP1 # RO 


JSET UP FOR THE EXPECTED INTERRUPT. 
t FSRC=0 


3201 
3202 


01 4626 


174410 






ir% s% » 

BBB5 S 


DlVD 




CRO) , ACO 


; TEST INSTRUCTION (SHOULD RESULT IN TRAP). 


3203 
3204 


014630 


170000 








CFCC 








3205 
3206 


014632 


000502 








BR 




BBBER4 


;G0 REPORT FAILURE, NO TRAP. 


3207 

3208 


014634 


022716 


014630 




BBB6: 


CMP 




IBBB5+2, (SP) 


•TRAP TO HERE WHEN THE DIVISION 8* 
^OCCURS, rlRST SEE IF InE ADDRESS Ur 


3209 
3210 




__ _ 














; THE TRAP IS 2+THE ADDRESS OF THE TEST 
jDIVD INSTRUCTION, 


321 1 
3212 


014640 
01 4642 


001402 
0001 37 


03661 4 






BEO 
JMP 




1$ 

g# FPSPUR 


?IF NOT THEN REPORT AN UNEXPECTED 


3213 
321 4 


01 46 *6 


170205 






— — — — — ■ 
1 $ » 


STFPS 




R5 


jFP TRAP, 
I GET FPS. 


3215 
321 6 


014650 
014652 


170303 
022626 








STST 
CMP 




R3 

(SP)+, (5P)+ 


J GET FEC f 

; RESET THE STACK, 


3217 
3218 


01 4654 


012704 


<6 A ft f*k A J*k 

100200 






mgv 




#100200, R4 


SEXPECTED FPS. 


3219 
3220 


014660 
014662 


020405 
001040 








CMP 

bne 




R4,R5 
BBBER2 


?IS FPS CORRECT? 

j IF INCORRECT BRANCH. 


3221 
3222 


014664 


A 4 **\ **** rife *X 

012702 


000004 






MQV 




#4,R2 


J EXPECTED FEC. 


3223 
3224 


014670 
014672 


020203 
001047 








CMP 
BNE 




R2,R3 
BBBER3 


JIS FEC CORRECT? 

;IF INCORRECT BRANCH. 


3225 
3226 


014674 


000137 


015124 






JMP 




8#B6BDQNE 


JOTHERWISE GO TO NEXT TEST. 


3227 
3228 


3229 
3230 


014700 


0627J7 


JL0JQLG.&2 


001236 


jTRAP HERE IF 
BBBEPl: ADD 




UNEXPECTED INTERRUPT OCCURS. 
#2.et$TMP2 ?SEE IF THE INTERRUPT OCCURRED 


3231 
3232 


















? DURING THE EXECUTION OF THE DIVD 
J INSTRUCTION BEING TESTED. 


3233 
3234 


014706 
014712 


021637 
001402 


001236 






CMP 
BEO 




(SP),e#$TMP2 
1$ 




3235 
3^36 


014714 


000137 


036614 






JMP 




<s»#FpSPUR 


;IF NOT REPORT UNEXPECTED FP TRAP. 


3237 
3238 


014720 

Q L472.2 


022626 
170303 






1$: 


CMP 
STST 




(SP)+f (SP) + 
R3 


;RESET THE STACK, 
;GET FEC. 
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FFPBA.P1 1 01 


-N0V»76 


21 :06 


■ ■ 


T5 


DIVD WITH (FSRCsO) AND (BUT FD) TEST 


3239 
3240 


014724 

014726 


170205 
012737 


A A A A A A 

000004 


001240 




STFPS 
MOV 


R5 " GET FPS, 
#4f£#$TMP3 jEXPECTED FEC 9 


3241 
3242 


014734 
014740 


010337 
010537 


001242 
001244 




- - ™ - 


MOV 
MOV 


R3,e#$TMP4 
R5, ##$TMP5 


3243 
3244 


014744 
014750 


010037 
012737 


001250 
140200 


A A 4 A * 

001246 




MOV 
MOV 


R0,##$TMP7 
#140200, §#$TMP6 


3245 
3246 


014756 


104017 






2$ : 


ERROR 


17 5 REPORT (BUT FD) FAILED RESULTING IN AN FP TRAP 

;WITH TRAPS DISABLED. 


3247 
3248 


014760 


000137 


015124 






JMP 


piBBBDONE 


3249 
3250 


014764 


010537 


001242 




J REPORT 

bbber2 : 


FPS INCORRECT! 
MOV R5,$#$TMP4 


3251 
3252 


014770 
014774 


010437 

A 4 A A "A *1 

010037 


001244 

A A 41 A 41 

001 246 






MOV 
MOV 


R4,##$TMP5 
R0,£#$TMP6 


3253 
3254 


015000 
015004 


010137 
104020 


001250 




1 $ 5 


MOV 
ERROR 


R1,@#$TMP7 
20 


3255 
3256 


015006 


000137 


015124 






JMP 


##BB8DONE 


3257 
3258 


— — 
015012 


0J0337 


001242 




; REPORT 

t*N r*» a ^ a 

BB8ER3 ! 


FEC INCORRECT? 
MOV R3,##$TMP4 


3259 
3260 


015016 

015022 


010237 
010037 


001240 
001 246 






MOV 
MOV 


R2,##$TMP3 
R0###$TMP6 


3261 
32^2 


015026 
015032 


010137 
104021 


001250 




is: 


MOV 
ERROR 


Rl # #*$TMP7 
21 


3263 
3264 


015034 


000137 


015124 






JMP 


@#BBBD0NE 


3265 
3266 










J REPORT NO TRAP OCCURRED AFTER TRYING TO DIVIDE 
jBY £ER0 WITH ALL TRAPS ENABLED, 


3267 

3268 


015040 
015042 


170303 

4 "9 A A f 

170205 






B8BER45 


STST 
STFPS 


R3 J GET FEC . 
R5 jGET FPS. 


3269 
3270 


015044 
015052 


012737 
010337 


000004 
001240 


001242 




MOV 
MOV 


#4, §#$TMP4 
R3, @#$TMP3 


3271 
3272 


015056 
015062 


010537 
012737 


001244 

M A 4\ i*% 4*% A 

100200 


001 246 




MOV 
MOV 


R5#@#$TMP5 
#100200, @#$TMP6 


3273 
3274 


015070 
01 5074 


010037 
010137 


001250 
001252 






MOV 
MOV 


R0*^#$TMP7 
R1 # @#$TMP10 


3275 
3276 


015100 
015102 


104022 

A A A A « *\ 

000410 






l$s 


ERROR 
BR 


22 

BBBDO.NE 


3277 
3278 


015104 


000000 


A A A A A A 

000000 


A A /\ A A A 

000000 


BBBpl : 


.WORD 


0,0,0,0 


3279 
3280 


015112 
015114 


000000 
012345 


054321 


023456 


BBBP2! 


.WORD 


12345,54321,23456,76543 


3281 
3282 


015122 


076543 












3283 
3284 


3285 
3286 


015124 
015124 


104412 






B8BDQNE 5 


RSETUP 


?G0 INITIALIZE THE FPS AND STACK? AND 


3287 
3288 














jSEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOFTWARE 


3289 
3290 














? VIRTUAL CONSOLE SWITCH REGISTER (HAS 
? THE USER TxPED CONTROL G? ) . 


3291 
3292 


3293 
3294 













A1NDEC 


-11-DFFPB-A 


POP 11/34 


FPP DIAGNOSTIC PART 2 
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FFPBA.P11 01 


•NOV-76 


21 506 


T6 


OIVF TEST 




3295 
3296 




— — — — 




?»TEST 
I* 


6 


DIVF TEST 


— =— — — — — < — — — •■■ — 1 — ; — - — - — — — ^^ mm ^ m— _., ,. — ■ — '■ 


3297 
3298 









?#THIS 
:#USED 


IS A TEST 
TQ SET UP 


OF THE DIVF 
THE OPERANDS 


INSTRUCTION. NOTE THAT A SUBROUTINE IS 
, EXECUTE THE INSTRUCTION AND CHECK THE 


3299 








I *RESULTS, 
:* 






3301 
3302 


0.L512&. ,. 


000004 




TST6S SCOPE 


3303 
3304 








:CHECK 


DIVF WITH 


(AC=0) . 




3305 
3306 


015130 
015130 


104413 




CCC 1 : 


LPERR 




;SET UP THE LOOP ON ERROR ADDRESS. 


3307 
3308 


015132 
015136 


004767 
000000 


000552 
000000 


1$ : 


JSR 
.WORD 


PC, DIVFSUB 
Of 


? AC 


3309 
3310 


015142 
015146 


012345 
000000 


067012 

oooooo 


2$s 
3$ : 


.WORD 
.WORD 


12345,67012 
0,0 


j FSRC 
?RES 


3311 
3312 


015152 
015154 


oooooo 

000004 




4$; 



4 




jFPS BEFORE EXECUTION. 
; EPS AFTER EXECUTION 


3313 
3314 


015156 
015162 


012345 
104023 


06701 2 


5$; 

6$ 5 


.WORD 

ERROR 


12345,67012 
23 


TERROR RESULT 
jRESULl oAPt 


3315 
3316 








? TEST 


DIVr WITH 


AC POSITIVE, 


r SRC P05I il Vb AND IN KUUNU r4UL'fc>. 


3317 
3318 


015164 
015164 


_ 

104413 




CCC2 J 


LPERR 




;SEI UP IHtu LUur UN AUUKloo , 


3319 
3320 


015166 
015172 


004737 
065652 


015710 
125252 


1$ S 


JSR 
. WORD 


PC,§iDIVFSUB 
65fe52 , 125252 


f AC 


3321 
3322 


015176 
015202 


065600 
040252 


oooooo 

125252 


2$5 

3$: 


.WORD 
.WORD 


65600,0 
40252, 1 25252 


JFSRC 
J RES 


3323 
3324 


015206 
015210 


003000 

A. A ""J A A A. 

003000 




4$: 


3000 
3000 




JFPS BEFORE EXECUTION, 
•FPS AFTER EXECUTION. 


3325 
3326 


015212 
015216 


040052 
1Q4Q24 


125252 


5$: 
6$: 


♦ WORD 
ERROR 


40052,125252 
24 


; ERROR RESULT. 

jDIV NORMALIZE FAILURE. 


3327 
3328 








J TEST 


DIVF WITH 


AC POSITIVE, 


FSRC POSITIVE. 


3329 
3330 


015220 
015220 


: _ 

10441 3 




CCC 3 s 


LPERR 




jSET UP THE LOOP ON ERROR ADDRESS, 


3331 
3332 


015222 
015226 


004767 
076400 


000462 

oooooo 


!$! 


JSR 
.WORD 


PC, DIVFSUB 
76400, 


* AC 


3333 
3334 


015232 
015236 


076400 

A M A a A 

040200 


oooooo 
oooooo 


2$s 
3$ $ 


* WORD 
.WORD 


76400,0 

A) A A\ A A A 

40200, 


yFSRC 

JRES 


3335 
3336 


015242 
015244 


001000 
001000 




4$: 


1000 

4 AAA. 

1 000 




?FPS BEFORE EXECUTION t 

*fr£» ftr ItK LAfclUl iur« , 


3337 
3338 


015246 


140200 


oooooo 


5$? 


. WORD 


140200,0 


J ERROR RES, 


3339 
3340... 


015252 


104025 




6$: 


ERROR 


25 


JSIGN BAD. 


3341 
3342 








; TEST 
CCC 4 ; 


DIVF WITH 


BOTH OPERANDS 


POSITIVE, 


3343 
3344 


015254 
015256 


104413 
0047 J7 


015710 




LPERR 
JSR 


PC,3#DIVFSUB 


jSET UP THE LOOP ON ERROR ADDRESS, 


3345 
3346 


015262 
015266 


056777 
054200 


177777 
OOOOOO 


1$; 
2$: 


.WORD 
• WORD 


56777,177777 
54200,0 


JAC 
?FSRC 


3347 

3548 


015272 
0l52Jt> 


042777 
OOOOOO 


mm 


3$: 
4$: 


.WORD 



42777 , 177777 


?RES 

;FPS BEFORE EXECUTION. 


3349 
3350 


015300 
015302 


000000 
002000 


002000 


5$ ! 




.WORD 


2000,2000 


;FPS AFTER EXECUTION, 
J ERROR RES. 



AINDEC 


•t 1 »DFFPB«A 


POP 11/34 


FPP DIAGNOSTIC PART 
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FFPBA. PU 0! 


-N0V-76 


21 S 06 


T6 


DIVF 


IEST 






3351 
3352 


015306 


104023 




6$; 


ERROR 


23 


m — : — - — - — - — 1 — — — - — — — - — -■—-——"»•»-- " 




3353 
3354 


015310 






; TEST 
CCC5? 


THE DIVF INSTRUCTION! 


— - ■ — — — — — — — - 




3355 
3356 


015310 
015312 


104413 
004737 


015710 




LPERR 
JSP 


PC « @#DIVF$UB 


J SET UP THE LOOP ON ERROR ADDRESS. 




3357 
3358 


015316 

A « C "4 A A 

015322 


012377 
012300 


177777 

oooooo 


1$: 
2$ : 


.WORD 
.WORD 


12377, 177777 
12300 r 


?AC 
jFSRC 




3359 
336D 


015326 
015332 


040252 
000000 


A A C A C A 

1 25252 


3$; 
4$ ? 


.WORD 



40252, 125252 


;RES 

j FPS BEFORE EXECUTION. 




3361 
3362 


015334 
015336 


000000 
177777 


177777 


5 $ 5 




• WORD 


•1 , »l 


;FPS AFTER EXECUTION . 
jERROR RES. 




3363 
3364 


015342 


104023 




6$: 


ERROR 


23 






3365 
3366 


015344 






; TEST 
CCC6? 


DIVIDE 


ALGORITHM. TEST 


ROUND CONSTANT, 




3367 
3368 


015344 
015346 


104413 
004737 


015710 




LPERR 
JSR 


PC# §#DIVFSU8 


jSET UP THE LOOP ON ERROR ADDRESS, 




3369 
3370 


015352 

Ad C ^ t* al 

015356 


064600 
066600 


A A A A A <t 

000001 

oooooo 


1$; 
2$ : 


.WORD 
♦ WORD 


64600,1 
66600, 


?AC 
;FSRC 




3371 
3372 


015362 
015366 


036200 
000000 


„w, * jfc a. #1 A 

000001 


3$ 5 
4$ 5 


.WORD 



36200, 1 


f RES 

JrPS BEr ORE EXECUTION, 




3373 
3374 


015370 
015372 


000000 

/X a H A A A 

003000 


003000 


s • 




.WORD 


A A A Tl A A A 

3000, 3000 


?FPS AFTER EXECUTION. 
JLRROR RES. 




3375 
3376 


015376 


104023 




6$! 


ERROR 


23 






3377 
3378 


015400 






; TEST 
CCC75 


DIVF. 


— — 






3379 
3380 


015400 
015402 


104413 
004737 


015710 




LPERR 
JSR 


PC , §#DI VFSUB 


JSET UP THE LOOP ON ERROR ADDRESS, 




3381 

3382 


015406 
015412 


034577 
023400 


177776 

oooooo 


1$; 
2$ $ 


.WORD 
• WORD 


34577, 177776 
23400, 


?AC 

; fsrC 




3383 
3384 


015416 
015422 


051377 
000017 


4 nil/; 

177776 


3$; 
4$ : 


t WORD 
1 7 


51377, 177776 


?RES 

;FPS BEFORE EXECUTION, 




3385 
3386 


015424 
015426 


oooooo 

003400 


003400 


5$ $ 




.WORD 


*3l A A A A t\ A 

3400, 3400 


;FPS AFTER EXECUTION, 
?ERROR RES, 




3387 
3388 


015432 




104023 




6$; 


ERROR 


23 






3389 
339Q 




— 






J DI VF 


— — 

TEST. 


„__„.„ 


■■ 




3391 
3392 


015434 
015434 


10441 3 




CCC8S 


LPERR 





$SET UP THE LOOP ON ERROR ADDRESS. 




3393 
3394 


015436 
015442 


004737 
067652 


015710 
125252 




JSR 
. WORD 


PC,f#DIVFSUB 
67652, 125252 


; AC 




3395 
3396 


015446 

A 4 C A C A 

015452 


056500 
051 343 


oooooo 

107070 


2$; 
3$ S 


.WORD 
.WORD 


56500,0 
51343, 107070 


SFSRC 
; PES 




3397 
3398 


015456 
015460 


oooooo 

A A A A A A 

oooooo 




4$; 








;FPS BEFORE EXECUTION. 
jFPS AFTER EXECUTION. 




3399 
3400 


015462 
015466 


051543 
104026 


4i a n A *f A 

1070 '0 


5$? 
6$ $ 


.WORD 
ERROR 


51543, 107070 
26 


? ERROR RES, 

5DIDN»T INCREMENT THE EXPONENT 




3401 
3402 














; AFTER DIVID NORMALIZATION , 




3403 
3404 


015470 






jDIVF 
CCC95 


WITH AC 


NEGATIVE, FSRC 


NEGATIVE, 




3405 
3406 


015470 
015472 


104413 
004737 


015710 




LPERR 
JSR 


PC,§#DIVFSUB 


;SET UP THE LOOP ON ERROR ADDRESS, 





( 





AlNDEC-ll-DFf PP 


i»A 


POP 11/34 


FPP DIAGNOSTIC PART 


2 


MAC til 27( 1006) 


07-FE8-77 12S06 PAGE 6: 


I 




i 




FFpBA , Pi 1 0! 


«NOtf»76 


21 !06 


T6 


DIVF 


TEST 








1 


c 


3407 
3408 


015476 
015502 


140400 
140500 


000000 
000000 


1$: 
2$; 


♦ WORD 

• WORD 




140400,0 
140500,0 


* A C 

?FSRC 






i 




3409 
_ JJ..10 


015506 
015512 


040052 
000000 


125253 


3$; 
4$: 


, WORD 





040052,125253 


?RES 

?FP$ BEFORE EXECUTION. 








1 


34! 1 
3412 


015514 
015516 


000000 
140052 


125253 


5$: 




• WORD 




140052, 125253 


jFPS AFTER EXECUTION . 
; ERROR RES, 






t 


1 


3413 
3414 


015522 


104027 




6$: 


ERROR 




27 


? BAD SIGN . 






4 


1 


3415 
3416 


015524 






JDIVF 
CCC10; 


WITH AC 


NEGATIVE AND FSRC 


POSITIVE, 








3417 
3418 


015524 
015526 


104413 
004737 


015710 




LPERR 
JSR 




PC,8#Divf$ue 


;SET UP THE LOOP ON ERROR 


ADDRESS, 




4 


i 


3419 
3420 


015532 
015536 


160077 
040277 


000000 
000000 


1$; 
2$: 


.WORD 

• WORD 




160077,0 
40277,0 


J AC 
?FSRC 






4 




3421 
3422 


015542 
015546 


160000 
000007 


000000 


3 $ s 
4$; 


.WORD 
7 




160000,0 


?RES 

;FPS BEFORE EXECUTION, 








i 


3423 
3424 


015550 
015552 


000010 
060000 


000000 


5$: 


10 

• WORD 




60000,0 


jFPS AFTER EXECUTION, 
? ERROR RES, 






4 


c 


3425 
3426 


015556 


104027 




6$: 


ERROR 




27 


J BAD SIGN , 






4 




3427 
3428 


015560 






?0IVF 
CCCli: 


WITH AC 


POSITIVE AND FSRC 


NEGATIVE, 








i 


3429 
3430 


015560 
015562 


104413 
004737 


015710 




tiPERR 
JSR 




PC,e#DIVFSUB 


;SET UP THE LOOP ON ERROR 


ADDRESS, 




4 


1 


3431 
3432 


015566 
015572 


040400 
140500 


000000 
000000 


1$; 
2$: 


• WORD 

• WORD 




40400,0 
140500,0 


? AC 
SFSRC 






4 




3433 
3434 


015576 
015602 


140052 
000017 


125253 


3$; 
4$: 


.WORD 
17 




140052, 125253 


t RES 

jFPS BEFORE EXECUTION, 








1 


3435 
3436 


015604 
015606 


000010 
040052 


125253 


5$; 


10 

• WORD 




40052,125253 


?FPS AFTER EXECUTION, 
• ERROR RES. 






€ 


I 


3437 
3438 


015612 


104027 




6$? 


ERROR 




27 


?8AD SIGN. 






< 




3439 
3440 


— 






j TEST 


DIVF BOTH 


OPERANDS POSITIVE AND TRUNCATE MODE, 








f 


3441 
3442 


015614 
015614 


104413 




CCC12S 


LPERR 






jSET UP THE LOOP ON ERROR 


ADDRESS, 




4 


1 


3443 
3444 


015616 
015622 


004737 
060100 


015710 
000001 




JSR 
• WORD 




PC, §#DIVFSUB 
60100,1 


S AC 






4 




3445 
3446 


015626 
015632 


040300 
060000 


000000 
000000 


2$; 
3$: 


• WORD 
.WORD 




40300,0 
60000,0 


?FSRC 
?RES 








i 


3447 
344$ 


015636 
015640 


000052 
000040 




4$5 


52 
40 






;FPS BEFORE EXECUTION. 
?FPS AFTER EXECUTION, 






4 


< 


3449 
3450 


015642 
015646 


060000 
104030 


000001 


5$ s 
6$: 


• WORD 

ERROR 




60000, 1 
30 


J ERROR RES, 

? TRUNCATION ERROR 






4 


3451 
3452 








?1>.IVF 


WITH POSITIVE OPERANDS AND 


ROUND MODE. 








t 


3453 
3454 


015650 
0i565& 


104413 




CCC13S 


LPERR 






SSET UP THE LOOP ON ERROR 


ADDRESS. 




4 


i 


3455 
3456 


015652 
015656 


004767 
060100 


000032 
000001 


1$: 


JSR 
. WORD 




PCDIVFSUB 
60100, 1 


?AC 






c 




3457 
3458 


015662 
015666 


040300 
060000 


000000 
000001 


2$; 
3$: 


• WORD 

• WORD 




40300,0 
60000,1 


;FSRC 
?RES 








« 


3459 
3460 


015672 000005 
015674 000000 




4$; 


5 






;FPS BEFORE EXECUTION. 
:FPS AFTER EXECUTION. 






I 


i 


3461 
346? 


015676 
015702 


060000 
104031 


000000 


5$? 
6$: 


. WORD 
ERROR 




60000,0 
31 


i ERROR RES. 
sROUND ERROR, 






4 
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T6 



DIVF TEST 



3463 
3464 



015704 000137 016J34 



JMP 



$#CCCDONE 



jGO TO NEXT TEST 



3465 
3466 



;THIS SUBROUTINES DIVFSUB, I S CALLED TO SET UP, EXECUTE 



3467 



AND CHECK THE RESULT OF A DIVF INSTRUCTION, IT IS CALLED THUS 5 



3469 J 

3470 ! 


\ JSR PC,£#DIVFSUB 

ACARG: • WORD X,X 1 


lAC OPERAND 


3471 J 

3472 3 


FSRC ARGs , WORD X,X 3 
RES: .WORD x,x ; 


•FSRC OPERAND 
5 EXPECTED RESULT 


3473 3 

3474 J 


? FPSB: .WORD X ! 

FPSAS • WORD X J 


fFPS BEFORE EXECUTION 
'FPS AFTER EXECUTION 


3475 I 

3476 ! 


ERRES: ,«ORD X,X j 
ERR? ERROR X j 


; ERROR RESULT 
t RESULT ERROR 


3477 ! 

3478 I 


\ CONT: 3 


! RETURN ADDRESS 


3479 J 

3480 ! 


'THE OPERANDS ARE SET UP (USING AGO FOR THE AC OPERAND ) * THEN 
•FPSB IS LOADED INTO THE FPS, THE INSTRUCTION , DIVF IS EXECUTED . 


3481 j 

3482 ! 


r AFTER THE EXECUTION THE RESULT IS CHECKED AGAINST THE 

; EXPECTED CORRECT RESULT* RES, IF IT IS CORRECT THEN THE FPS 


3483 3 
3484 


fIS CHECKED WITH THE EXPECTED CORRECT FPS, FPSA, IF THE FPS WAS 
I INCORRECT THEN IT IS REPORTED, IF THE RESULT ^AS INCORRECT IT 


3485 
3486 


? IS COMPARED WITH ERRES IN AN ATTEMPT TO ANALYSE THE EPPOR. IF 
» THE INCORRECT RESULT MATCHED ERRES THEN CONTROL IS PASSED TO 


3487 
3488 


f THE ERROR CALL AT ERR. IF THE INCORRECT RESULT DID NOT MATCH ERRES 
f THEN THE FAILURE IS REPORTED IN DIVFSUB AND CONTROL IS PASSED TO 


3489 
3490 


; CONT, IF NO ERRORS ARE DETECTED THEN DIVFSUB RETURNS CONTROL 
fTO CONT, 



3491 
3492 


015710 


012601 






DIVFSUB; 


MOV (SP)+,Rl 


; GET A POINTER TO THE ARGUMENTS * 


3493 


015712 


012700 


000200 




MOV 


#200, RO 


JSET FD MODE. 


3494 


015716 


170100 






LDFPS 


RO 




3495 


015720 


010100 






NOV 


P1,R0 


?LOAD THE AC OPERAND, 


3496 


015722 


172410 






LDD 


(RO),ACO 




3497 


015724 


016100 


000014 




MOV 


14(R1),R0 


; LOAD THE FPS 


3498 


015730 


170100 






LDFPS 


RO 




3499 


015732 


012737 


015746 


001236 


MOV 


ti$i §#$TMP2 




3500 


015740 


010100 






MOV 


Rl,RO 




3501 


015742 


062700 


000004 




ADD 


#4,R0 


t ESTABLISH A POINTER TO FSRC. 


3502 
















3503 


015746 


174410 






l$; Divf 


(RO), ACO 


? TEST INSTRUCTION. 


3504 
















3505 


015750 


170204 






STFPS 


R4 


7 GET THE FPS. 


3506 


015752 


012700 


000200 




MOV 


#200, RO 


?SET FD MODE 


3507 


015756 


170100 






LDFPS 


RO 




3508 
















3509 


015760 


012700 


016124 




MOV 




;GET THE RESULT OF THE DIVF. 


3510 


015764 


174010 






STD 


ACQ, (RO) 




3511 
3512 


015766 


010102 






MOV 


R1,R2 


JSAVE THE DATA IN CASE OF ERROR. 


3513 


015770 


010237 


001240 




MOV 


R2,(M$TMP3 




3514 


015774 


062702 


000004 




ADD 


#4,R2 




3515 


016000 


010237 


001242 




MOV 


R2,g#$TMP4 




3516 


016004 


062702 


000004 




ADD 


#4,R2 




3517 


016010 


010237 


001244 




MOV 


R2,@#$TMP5 




3518 


016014 


012737 


016124 


001246 


MOV 


#DIVFT f §#$TMP6 
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■.TPBA.PU 01 


-N0V-76 


21:06 




T6 


DIVF TEST 






IP 

1 


3519 
3520 


016022 
016026 


010437 
016137 


001250 
000016 


001252 




MOV 
MOV 


R4,§i#$TMP7 
16(R1),§#$TMP10 


g 




3521 

352J2 


016034 


021061 


000010 




. : . 


CMP 


(RO), 10CR1) 


? IS THE RESULT CORRECT? 




4 


3523 
3524 


016040 
016042 


001011 
026061 


000002 


000012 




BNE 
CMP 


10$ 

2(RG) # 1 2(R1 ) 


;IF INCORRECT BRANCH. 


< 


1 


3525 
3526 


016050 


001005 








BNE 


10$ 


— - — ■ — ■ — ■ — • — ■ — ; ■ — . — , 


1 




3527 
3528 


016052 
016056 


026104 
001020 


000016 






CMP 

BNE 


16fRl),R4 
15$ 


J IS FPS CORRECT? 

jIF INCORRECT BRANCH. 






3529 
3530 


016060 


000161 


000026 






JMP 


26(R1) 


?IF NO ERRORS OCCURRED RETURN. 


< 


1 


3531 

353? 


016064 
016070 


021061 
001010 


000020 




los: 


CMP 
BNE 


CR0),20(R1) 
11$ 


JDOES THE INCORRECT RESULT 

j MATCH THE ANTICIPATED INCORRECT RESULT. 


4 




3533 
3534 


016072 
OlblOO 


026061 
001004 


000002 


000022 




CMP 

BNE 


2(R0),22(R1 ) 
11$ 


jBRANCH IF NO. 




1 


3535 
3536 


016102 


010102 


: 






MOV 


Rl »R2 


7 IT MATCHED SO RETURN TO THE ERROR 


< 


1 


3537 
3538 


016104 


062702 


000024 






ADD 


#24, R2 


j REPORT AT THE CALLING ROUTINE. 


l 




3539 
3540 


016110 


000112 








JMP 


(R2) 






€ 


3541 
3542 


016112 
016112 


1 04023 






11$: 
12$ : 


ERROR 


— — ■ 

23 


f REPORT RESULT INCORRECT • 


< 




3543 
3544 


016114 


000161 


000026 




13$: 


JMP 


26(R1) 




1 




3545 
3546 


016120 
016120 


104032 






15$: 
16$; 


ERROR 


32 


J REPORT FPS INCORRECT, 

— — ■ 




f 


3547 
3548 


016122 


000774 


~ — 






BR 


13$ 




1 


1 


3549 
3550 


016124 
016132 


000000 
000000 


000000 


000000 


Divft: 


.WORD 


0,0,0,0 




I 




3551 
3552 


016134 








CCCDGNE: 








1 


3553 
3554 


016134 


104412 








RSETUP 




;G0 INITIALIZE THE FPS AND STACK? AND 
:SEE IF THE USER HAS EXPRESSED 


1 


f 


3555 
3556 


- — 














;TH£ DESIRE TO CHANGE THE SOFTWARE 

? VIRTUAL CONSOLE SWITCH REGISTER (HAS 


A 




3557 
3558 
















; THE USER TYPED CONTROL G? ) , 




1 


3559 
3560 


















4 


f 


3561 
3562 


, — 








• •##*####♦###*##»#♦####*#####*####**##♦♦#####**#*####*###♦####### 

?#TEST 7 DIVD TEST 






3563 
3564 










?* 

;*THts 


IS A TEST 


OF THE DIVD 


INSTRUCTION, NOTE THAT A SUBROUTINE IS 




C 


3565 
3566 










?*USED 
: * 


TO SET UP 


THE OPERANDS 


, EXECUTE THE INSTRUCTION AND CHECK THE RESULTS. 


€ 


I 


3567 
3568 


01 61 36 


A A. A J^V M 

000004 






TST7 5 SCOPE 


4 




3569 
3570 










JOIVD 


TEST WITH 


POSITIVE OPERANDS AND IN ROUND MODE. 




t 


3571 
3572 


016140 
016140 


IQ4413 






DDD1 : 


LPERR 




;SET UP THE LOOP ON ERROR ADDRESS, 


I 


4 


3573 
3574 


016142 
01614b 


004737 
034277 


016630 
000000 


000000 


1$: 


JSR 
.WORD 


PC f $#DIVDSUB 
34277,0,0,0 


;AC 


1 



i _ 


ilNDEC 


-11-DFFPF 




PDP 11/34 FPP 


DIAGNOSTIC PART 


2 MACYU 27(1006) 


07-FE8-77 12506 PAGE 66 




>FP8A,P11 01 


»N0V»7t? 


21506 




T7 


DIVD 

■— — — — 


TEST 




_ — . _ . _.. 

L 


< 


3575 
3576 


016154 
016156 


000000 
040277 


OOOOOO 


_™_ 
OOOOOO 


2$ : 


• WORD 


40277,0,0,0 


?FSRC 


1 




3577 
3578 


016164 
016166 


000000 
034200 


OOOOOO 


OOOOOO 


3$ : 


.WORD 


34200, 0,0 f 


JRES 




1 


3579 
3580 


016174 
016176 


000000 
000200 


— — — - — - - 




4$ ; 


200 




jFPS BEFORE EXECUTION. 


i 


4 


3581 
3582 


016200 
016202 


000200 
177777 


177777 


177777 


5$; 


200 
f WORD 


-1,-1, -1,»1 


;FPS AFTER EXECUTION, 
j ERROR RES. 


1 




3583 
3584 


016210 
016212 


177777 
104033 






6$s 


ERROR 


33 






j 
f 


3585 
3586 










JDIVD 


WITH AC 


NEGATIVE AND FSRC 


POSITIVE IN TRUNCATE MODE. 


\ 


< 


3587 
3588 


016214 
016214 


104413 


—————— 


——— 


D0D2S 


LPERR 




j SET UP THE LOOP ON ERROR ADDRESS. 


\ 




3589 
3590 


016216 
016222 


004737 
134277 


016630 
OOOOOO 


OOOOOO 


— 

l$s 


JSR 
.WORD 


PC , i#DIVDSUB 
134277,0,0,0 


t AC 




1 


3591 
3592 


016230 
016232 


000000 
040277 


OOOOOO 


OOOOOO 


2$; 


.WORD 


40277,0,0,0 


JFSRC 


A 

\ 


I 


3593 
3594 


016240 
016242 


000000 
134200 


OOOOOO 


OOOOOO 


3$$ 


.WORD 


134200, 0,0,0 


?RES 


< 




3595 
3596 


016250 
016252 


000000 
000207 






4$; 


207 




,'FPS BEFORE EXECUTION . 




1. 


3597 
3598 


016254 
016256 


000210 
177777 


177777 


177777 


5$ : 


210 
.WORD 


•1,-1, •1,"*! 


?FPS AFTER EXECUTION. 
JERROR RESULT. 


I 


4 


3599 
3600 


016264 
016266 


177777 
104033 






6$ : 


ERROR 


33 




t 




3601 
3602 










jDIVD 


TEST WITH OPERANDS BOTH NEGATIVE AND IN TRUNCATE MODE, 




I 


3603 
3604 


016270 
016270 


104413 






D0D3S 


LPERR 




jSET UP THE LOOP ON ERROR ADDRESS, 


A 

< 


f 


36$5 
3606 


016272 
016276 


004767 
134300 


000332 
OOOOOO 


OOOOOO 


1 $ : 


JSR 
.WORD 


PC,DIVDSUB 
134300,0,0, 1 


?AC 


i 




3607 
3608 


016304 
016306 


000001 
140300 


OOOOOO 


OOOOOO 


2$; 


• WORD 


140300,0,0,0 


J FSRC 




A 

t 


3609 
3610 


016314 
016316 


oooooo 

034200 


OOOOOO 


OOOOOO 


3$: 


.WORD 


34200*0,0,0 


* RES 


A 

1 


i 


3611 
3612 


016324 
016326 


000000 
000250 






4$; 


250 




JFPS BEFORE EXECUTION, 


i 




3613 
3614 


016330 
016332 


000240 
034200 


OOOOOO 


OOOOOO 


5$: 


240 
. WORD 


34200,0,0, 1 


jFPS AFTER EXECUTION. 
; ERROR RES. 




A 

1 


3615 
3616 


016340 
016342 


000001 
104035 






6$: 


ERROR 


35 


J TRUNCATION ERROR, 


€ 


€ 


361? 
3618 






— — — 


_______ 


J DI VD 


WITH AC 


POSITIVE AND FSRC NEGATIVE IN ROUND MODE. 


f 




3619 
3620 


016344 
016344 


104413 






0DD4S 


LPERR 




;SET UP THE LOOP ON ERROR ADDRESS. 




A 


3621 
3622 


016346 
016352 


004737 
034300 


016630 
OOOOOO 




OOOOOO 


!$: 


JSR 
.WORD 


PC,e#DIVDSUB 
34300,0,0,1 


* A C 


A 

1 


4 


3623 
3624 


016360 
016362 


000001 
140300 


OOOOOO 


OOOOOO 


2 $ 5 


• WORD 


140300,0,0,0 


JFSRC 


c 




3625 
3626 


016370 
016372 


OOOOOO 
134200 


OOOOOO 


OOOOOO 


3$; 


• WORD 


134200,0,0, 1 


f RES 




J! 

1. 


3627 


016400 
QIHQ2 


000001 
000207 






4$: 


207 




?FPS BEFORE EXECUTION. 


i 

% 


1 


3629 
3630 


016404 
016406 


000210 
134200 


OOOOOO 


OOOOOO 


5$: 


210 
.WORD 


134200# 0,0,0 


;FPS AFTER EXECUTION. 
; ERROR RES. 


i 



t 
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J 1 ' 

< _ 


3631 


016414 
016416 


oooooo 

104036 






6$ l 


ERROR 


36 


? ROUND ERROR, 






3633 
3634 








._ — . — 


;DIVO 


TEST, 




— „_ _ ; — 


_ , __ „ ____ — ; — _____ — , 


1 


3635 
3636 


016420 
016420 


— : 

104413 


— „.. — „ 




DDD5 ! 


LP ERR 




;SFT UP THE LOOP ON ERROR ADDRESS. 


_ _ — . 


1 


3637 
3638 


016422 
016426 


004737 
100400 


016630 
OOOOOO 


oooooo 


1$S 


JSR 
, WORD 


PC, ($>#DI VDSUB 
100400,0,0,0 


jAC 






3639 


016434 


OOOOOO 














- . - ... . .. , _ 




3640 


016436 


_0..00500 


OOOOOO 


oooooo 


2$: 


.WORD 


500,0,0,0 


JFSRC 




1 


3641 
3642 


016444 
016446 


OOOOOO 
140052 


125252 




3$; 


• WORD 


140052, 125252 


5RE8 




1 


3643 
3644 


016452 
016456 


125252 
007647 


125252 


- — — 


4$ i 


.WORD 
7647 


125252,125252 


?FPS BEFORE EXECUTION. 






3645 


016460 


007650 


... . . 






7650 




jFPS AFTER EXECUTION. 






3646 


016462 


177777 


177777 


177777 


5$; 


.WORD 


•It »1,-1,-1 


? ERROR RES. 




M 
I 


3647 


016470 


177777 


















3648 


016472 


104033 






6$; 


ERROR 


33 






1 


3649 

3_.5___... 






















3651 










?DIVD 


TEST WITH 


AC POSITIVE AND FSRC NEGATIVE IN ROUND HODE, 






__li>52 


016474 








DOD65 










1 ^ 


3653 


016474 


104413 








LPERR 




;SET UP THE LOOP ON ERROR ADDRESS. 






3654 


016476 


004737 


016630 






JSR 


PC,3#DIVDSUB 








3655 


016502 


000400 


OOOOOO 


oooooo 


Hi 


.WORD 


400,0,0,0 


?AC 




t 


3656 


016510 


OOOOOO 


















3657 


016512 


100500 


OOOOOO 


oooooo 


2$ ! 


• WORD 


100500,0,0,0 


?FSRC 






3658 


016520 


OOOOOO 
















< 


3659 
3660 


016522 
016526 


140052 
125252 


125252 
12525 3 




3$: 


.WORD 
.WORD 


140052, 125252 
125252,125253 


;res 




€ 


3661 
3662 


016532 
016534 


007707 
007710 






4$S 


7707 
7710 




;FPS BEFORE EXECUTION, 
?FPS AFTER EXECUTION. 






3663 


016536 


177777 


— . , — 

177777 


177777 


5$ ; 


.WORD 




? ERROR RES. 






3664 


016544 


177777 
















1 


3665 
3666 


016546 


104033 


____ 


: ; 


6$ S 


_ 

error 


33 








3667 
3668 


________ — 

016550 


— — 






?DIVD 

DDD7S 


- — — — — 

TEST. 










3669 


016550 


104413 








LPERR 




?SET UP THE LOOP ON ERROR ADDRESS, 






3670 


016552 


004737 


016630 






JSR 


PC,$#DIVDSUB 






< 


3671 


01655& 


170360 


170360 




1$: 


.WORD 


170360,170360 


;AC 







3672 


016562 


170360 


170360 






- WORD 


170360, 170360 








3673 


016566 


170360 


170360 




2 $ S 


,WORD 


170360,170360 


SFSRC 






3674 


.016572 


17JL3M 


„JjL0360 






. WORD 


170360.170360 








3675 
3676 


016576 
016604 


040200 
OOOOOO . 


OOOOOO 


oooooo 




3$; 


.WORD 


40200,0,0,0 


?RES 




f 


3677 
3679 


016606 
G1MJ.0 


007717 
007700 







4$5 


7717 
7700 




;FPS BEFORE EXECUTION, 
:FPS AFTER EXECUTION. 






3679 


01661 2 


177777 


177777 


17777 7 


5$ I 


. WORD 


»1 , *1 , »1 , **1 


; ERROR RES. 




g 
1 


3680 


016620 


177777 


















3681 


016622 


104033 






6$: 


ERROR 


33 








3682 




















( 


3683 
3684 


016624 


000137 


017070 






JMP 


it dpddone 


;G0 TO NEXT TEST. 




4 


3685 




















3686 












SUBROUTINE 


;, DIVDSUB, IS 


CALLED TO SET UP, EXECUTE 







JNDEC-i 1-DFFPB 


•A 


POP 11/34 FPP 


DIAGNOSTIC PART 2 


MACU1 27( 1006) 07-FE8»77 12:06 PAGE 68 ! 


rsr~" ■ — 

!_ 


'FP&A.Pll 01 


-NOV-76 


21506 




T7 


DIVD TEST ~ "j_ 


1 


3687 

3688 










j AND 

* 
* 


CHECK THE RESULT OF A DIVD INSTRUCTION, IT IS CALLED THUS * 

1 




3689 
3690 










• 
• 

t. _. 


ACARG5 


JSR PC,§#DIVDSUB 

. WORD X, X, Xr X ;AC OPERAND 


M 

1 


3691 
3692 


— ™ 






_._ 


• 

r 

• 


FSRCARG : 
RES : 


.WORD X,X,X,X JFSRC OPERAND f 
. WORD X.X»X,X ; EXPECTED RESULT 


< 


3693 
3694 










a 

f 


FPSB5 
FPSA; 


. WORD X JFPS BEFORE EXECUTION 

. WORD X jFPS AFTER EXECUTION f 




3695 
3696 








- - 




ERRESJ 
ERR : 


. WORD X,X,X,X ; ERROR RESULT 
ERROR X ? RESULT ERROR 


1 


3697 
3698 












C0NT5 


? RETURN ADDRESS ( 


i 


3699 
3700 








— — 


?THE 
jFPSB 


OPERANDS ARE SET UP (USING ACO FOR THE AC OPERAND) * THEN 
IS LOADED INTO THE EPS. THE INSTRUCTION, DIVD IS EXECUTED. f 




3701 
..3302 










j AFTER THE EXECUTION THE RESULT IS CHECKED AGAINST THE 
;EXPECTED CORRECT RESULT* RES. IF IT IS CORRECT THEN THE EPS 


t 


3703 










jIS CHECKED WITH 
j INCORRECT THEN 


THE EXPECTED CORRECT FPS, FPSA. IF THE FPS WAS | 
IT IS REPORTED, IF THE RESULT WAS INCORRECT IT 


( 


3705 

3706 










?IS COMPARED WITH ERRES IN AN ATTEMPT TO ANALYSE THE ERROR. IF 

; THE INCORRECT RESULT WATCHED ERRES THEN CONTROL IS PASSED TO f 




3707 
3708 










; THE 
; THEN 


ERROR CALL AT ERR, IF THE INCORRECT RESULT DID NOT HATCH ERRES 
THE FAILURE IS REPORTED IN DIVDSUB AND CONTROL IS PASSED TO 


t 


3709 
3710 










;CONT, IF NO ERRORS ARE DETECTED THEN DIVDSUB RETURNS CONTROL f 
STO CONT. 


< 


3711 
3712 


016630 


012601 






DIVDSUB; 


MQV loPJ + fRl *bc*l A rUlN I LK 1U Inc* AK«Un&pH 5« ^ 




3713 
3714 


016632 
016636 


012700 
170100 


000200 






MOV 
LDFPS 


#200 f R0 ."SET FD MODE, 
RO 


f 


3715 
3716 


016640 


010100 








MOV 


i 

R1,R0 ;SET UP THE ACO OPERAND, 


f 


3717 
3718 


016642 
016644 


172410 
016100 


000030 






LDD 
MOV 


(RO).ACO 

30(R1),R0 jLQAD THE FPS. f 




3719 
3720 


016650 


170100 








LDFPS 


RO 


1 


3721 
3722 


016652 
016660 


012737 
010100 


016666 


001236 




NOV 
MOV 


#1$,§#$TMP2 { 
R1.R0 ; ESTABLISH A POINTER TO FSRC. 


c 


3723 
3724 


016662 


062700 


000010 






ADD 


#10, RO 

1 




3725 
3726 


016666 


174410 






1$; 


DIVD 


(RO),AC0 lEXECUTE THE TEST INSTRUCTION, 


4 


3727 
3728 


016670 
016672 


170204 
012700 


OQOiOQ 






STFPS 
NOV 


R4 ? GET THE FPS, | 
#200, RO ?SET FD MODE, 


i 


3729 
3IJQ. 


016676 


170100 








LDFPS 


RO 

1 




3731 
3732 


016700 
016704 


012700 
174010 


017060 






MOV 
STD 


#DIVDT,RO ? GET THE RESULT, 
ACO, (RO) 


1 


3733 
3734 


016706 


010102 








MQV 


R1,R2 JSAVE DATA IN CASE OF ERROR. 


€ 


3735 
3736 


016710 
016714 


010237 
062702 


001240 
000010 






MOV 
ADD 


R2,##$TMP3 

#10, R2 I 




3737 
3738 


016720 
016724 


010237 
062702 


001242 
000010 






MOV 
ADD 


R2,g#$TMP4 
#10, R2 


_ ' 
1 


3739 
3740 


016730 

ill 6.7 34 


010237 
JQLL211.7 


001244 
017060 


001246 




MOV 
MOV 


R2,£#$TMP5 I 
#DIVDT.fc#$TMP6 


1 


3741 
3742 


016742 
016746 


010437 
016137 


001250 
000032 


001252 




MOV 

MQV _ 


R4,$#$TMP7 

32(Rl)t «a«$TMP10 < 





tINDEC 


-n-DFrpe 


-k 


POP 11/34 FPP DIAGNOSTIC PART 2 


MAC Y 1 1 27(1006) 


07-FEB-77 12:06 PAGE 69 






TPBA.PU 01 


•NQV-76 


21S06 T7 


DIVD TEST 




[ 




3743 
3744 


016754 


010102 




MOV 


Rl,R2 


? CHECK THE RESULT • 


f 




3745 
3746 


016756 
016762 


062702 
012703 


000020 
017060 


ADD 
MOV 


#20, R2 
#DIVDT,R3 






i 


3?47 
3748 


016766 
016772 


012705 

022223 


000004 

2$5 


MOV 
CMP 


#4#R5 

<R2)+» (R3)+ 




1 


« 


3749 
3750 


016774 
016776 


001006 
077503 




BNE 

$08 


10$ 
R5,2$ 


; BRANCH IF RESULT INCORRECT, 


t 




3751 
3752 


017000 


026104 


000032 


CMP 


32(Rl)f R4 


;IS EPS CORRECT? 




f 


3753 
3754 


017004 
017006 


001023 
000161 


000046 


SHE 
JMP 


15$ 

46(R1) 


? BRANCH IF INCORRECT „ 
? RETURN . 


t 


I 


3755 
3756 


017012 


010102 


10$S 


MOV 


R1,R2 


JWAS INCORRECT RESULT ANTICIPATED? 


1 




3757 
3758 


017014 
017020 


062702 
012703 


000034 
017060 


ADD 
MOV 


#34, R2 
#DIVDT,R3 






1 


3759 
3760 


017024 
017030 


012705 
022223 


000004 

11$: 


MOV 
CMP 


#4,R5 

(R2)+, CR3)+ 




f 


i 


3761 
3762 


017032 
017034 


001005 
077503 




BNE 
SOB 


12$ 

R5, 11$ 


j BRANCH IF NO. 


1 




3763 

3764 


017036 
017040 


010102 
062702 


000044 


MOV 
ADD 


R 1 , R 2 
144, R2 


•IF THE INCORRECT RESULT WAS 
j ANTICIPATED RETURN TO THE 




t 


3765 
3766 


017044 


000112 




JMP 


(K2) 


?ERROR REPORT I H THE CALLING 
^ROUTINE, 


€ 


€ 


3767 
3768 


017046 




12$; 






? REPORT RESULT INCORRECT, 


f 




3769 
3770 


017046 
017050 


104033 
000161 


13$$ 

000046 14$ S 


ERROR 
JMP 


33 

46CR1) 






f 


3771 
3772 


017054 




15$: 






; REPORT FPS INCORRECT . 


1 


€ 


3773 
3774 


017054 
017056 


104034 
000774 


16$: 


ERROR 
BR 


34 
14$ 




4 




3775 
3776 


017060 


000000 


000000 oooooo divot: 


• WORD 


0,0,0,0 






t 


3777 
3778 


017066 


000000 










1 


4 


3779 
3780 


017070 
017070 


104412 


DDDDONE: 

RSETUP 




?G0 INITIALIZE THE FPS AND STACK? AND 


-i 




3781 
3782 












jSEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOFTWARE 




1 


3783 
3784 












jVIRTUAL CONSOLE SWITCH REGISTER (HAS 
? THE USER TYPED CONTROL G? ) • 


< 


< 


3785 
3786 


















3787 
3788 






• ;##♦##♦######*####»#####»############*##*##♦####***♦#*#*####*### 






3789 
3790 






;#TEST 
: * 


10 


MULf TEST 




< 



3791 

1212. 



*THIS IS A TEST OF THE MULF INSTRUCTION. IT MAKES USE OF A SUBROUTINE 
»TQ SET UP THE OPERANDS, EXECUTE THE MULF INSTRUCTION AND CHECK THE 



3793 
3794 



^RESULTS, 
# 



3795 
_379£_ 



017072 000004 



TST10: SCOPE 



3797 
3798 



: MULF W ITH (FSRC = A CsQ) 



.INDEC 


-11»DFFP8 


• A 


PPP 11/34 


FPP DIAGNOSTIC PART 


2 HACm 27(1006) 


07-FEB-77 12:06 PAGE 70 




'FP6A.P1 1 01 


-NOV-76 


21 !06 


T10 


mulf test 






3799 
38^0 


017074 
017074 


104413 




EEEi; 


LPERR 




ySET UP THE LOOP ON ERROR ADDRESS, 




3801 
3802 


017076 
017102 


004737 
000000 


017654 
000000 


— _ 

1$: 


JSR 
♦ WORD 


~ PC | pMOliFSUB 
0,0 


?AC 




3803 
3804 


017106 
017112 


000000 
000000 


000000 
000000 


2$; 
3$s 


.WORD 
.WORD 


0,0 
0,0 


?FSRC 
:RES 




3805 
380$ 


017116 
017120 


007517 
007504 




4$: 


7517 
7504 




:FPS BEFORE EXECUTION, 
♦FPS AFTER EXECUTION. 




3807 
3808 


017122 
017126 


177777 
104037 


177777 


5$: 
6$; 


.WORD 

ERROR 


- 1 , * 1 

37 






3809 
3810 








SMULF 


WITH (FSRC=0). 






38 U 
3812 


017130 
017130 


104413 




EEE25 


LPERR 




jSET UP THE LOOP ON ERROR ADDRESS. 




3813 
3814 


017132 
017136 


004737 
071625 


017654 
034435 


1$; 


JSR 
. WORD 


PC-,3#MUI,FSUB 

71625, 34435 


?AC 




3815 
3816 


017142 
017146 


000000 
000000 


000000 
000000 


2$: 
3$: 


.WORD 
.WORD 


0,0 
0,0 


?FSRC 
jRES 




3817 
3818 


017152 
017154 


000013 
000004 




4$: 


13 
4 




;FPS BEFORE EXECUTION. 
;FPS AFTER EXECUTION . 




3819 
3820 


017156 
017162 


177777 
104037 


177777 


5$: 
6$s 


.WORD 

ERROR 


•lf-l 

37 


J ERROR RES, 




3821 
3822 








;MULF 


WITH (AC 


=0) 






3823 
3824 


017164 
017164 


104413 




EEE 3 * 


LPERR 




f SET UP THE LOOP ON ERROR ADDRESS. 




3825 
3826 


017166 
017172 


004737 

000000 


017654 
000000 


1$; 


JSR 
• WORD 


FC,§#MULFSUB 
0,0 


?AC 




3827 
3828 


017176 
017202 


071625 
000000 


153443 
000000 


2$: 
3$; 


.WORD 
.WORD 


071625,153443 
0,0 


?FSRC 
jRES 




3829 
3830 


017206 
017210 


007500 
007504 




4$: 


7500 
7504 




jFPS BEFORE EXECUTION t 
;FPS AFTER EXECUTION , 




3831 
3832 


017212 
017216 


177777 
104037 


177777 


5$5 

6$: 


.WORD 
ERROR 


-1 , -1 

37 


? ERROR RES. 




3833 
3834 








JMUJjF 


WITH AC 


POSITIVE AND FSRC 


POSITIVE IN ROUND HQDE, 




3835 
3836 


017220 
017220 


104413 




EEE4 ; 


LPERR 




;SET UP THE LOOP ON ERROR ADDRESS. 




3837 
3838 


017222 
017226 


004737 
040200 


017654 
000000 


l$; 


JSR 
.WORD 


PC,e#MULFSUB 
40200,0 


;AC 




3839 
3840 


017232 
017236 


040177 
040177 


177777 
177777 


2 $ * 
3$; 


♦ WORD 
.WORD 


40177,-1 

40177, -1 


J FSRC 
?RES 




3841 
3842 


017242 
017244 


000017 
000000 




4$; 


17 





?FPS BEFORE EXECUTION, 
jFPS AFTER EXECUTION. 




3843 
3844 


017246 
017252 


140177 
104041 


177777 


5$: 
6$; 


.WORD 
ERROR 


140177, •! 
41 


; ERROR RES. 
; BAD SIGN. 





t 



4 



c 



3845 



3847 


017254 






EEE5 " 








3848 


017254 


104413 






LPERR 




j SET UP THE LOOP ON ERROR ADDRESS, 


3849 


017256 


004767 


000372 




JSR 


PCMULFSUB 




3850 


017262 


040177 


177777 


1$! 


, WORD 


40177,-1 


J AC 


3851 


017266 


040200 


000000 


2$j 


• WORD 


40200,0 


?FSRC 


3852 


_Q±J212 


040177 


177777 


3$: 


• WORD 


40177,-1 


?RES 


3853 


017276 


000040 




4$: 


40 




;FPS BEFORE EXECUTION. 


3854 


. 017 30.0... 


000040 






_UL_ 




jFPS AFTER EXECUTION. 



i 



i 





UNDEC 


*1 1 *DFFP8 


-A 


PDP 11/34 


FPP DIAGNOSTIC PART 


2 MAC If U 27(1 006) 


07-FEB-77 12:06 PAGE 71 


I 




TFPBA.PU 01 


*NQV«76 


21506 


no 


MULF 


FEST 




C 


l _ 


3855 
3856 


017302 
017306 


037777 

104042 


177777 


5$S 
6$ ; 


.WORD 
ERROR 


37777,-1 

42 


j ERROR RES. 

1ST 252 TO 044 INTO 444 (BUT if 62 ) 


€ 




3857 
3858 














jMUL. NORMALIZATION FAILURE. 




1 


3859 
3?6Q 




017310 






? MULF 
EEE6 ! 


WITH BOTH OPERANDS POSITIVE NORMALIZE TEST* 


t 


> 


3861 
3862 


017310 
017312 


104413 
004737 


017654 




LPERR 
JSR 


PCMMULFSUB 


?SET UP THE LOOP ON ERROR ADDRESS, 


f 




3863 
3864 


017316 
017322 


040100 
040100 


000000 
000000 


1$S 

2$; 


-WORD 
.WORD 


40100,0 
40100,0 


I AC 

JFSRC 




i 


3865 
3866 


017326 
017332 


040020 
000012 


000000 


3$; 
4$; 


« WORD 
12 


40020,0 


f RES 

?FPS BEFORE EXECUTION. 


< 


4 


3867 
3868 


017334 
017336 


000000 
042040 


000000 


5$: 




.WORD 


42040,0 


?FPS AFTER EXECUTION, 
J ERROR RES. 


C 




3869 
3870 


017342 


104043 




6$: 


ERROR 


43 


?ST 252 TO 444 INTO 042 (BUT ,62) 
?MUL» NORMALIZATION FAILURE, 




1 


3871 
3872 










WITH BOTH OPERANDS POSITIVE IN ROUND MODE. 


< 


1 


3873 
3874 


017344 
017344 


104413 




EEE7S 


LPERR 




?SET UP THE LOOP ON ERROR ADDRESS, 






3875 
3876 


017346 
017352 


004737 
017500 


017654 

000000 


1$: 


JSR 

.WORD 


PC,§#MULFSUB 
17500,0 


5 AC 




t 


3877 
3878 


017356 
017362 


023652 
003177 


125252 
177777 


2$: 
3$5 


.WORD 
.WORD 


23652,125252 
3177, -1 


5 FSRC 
JRES 


c 


C 


3879 
3880 


017366 
017370 


007417 
007400 




4$S 


7417 
7400 




?FPS BEFORE EXECUTION. 
jFPS AFTER EXECUTION. 


f 




3881 
3882 


017372 
017376 


177777 
104037 


177777 


5$: 

6$ : 


.WORD 
ERROR 


m 1 , * I 
37 






c 


3883 
3884 








; MULF 


WITH AC 


POSITIVE AND FSRC 


NEGATIVE IN POUND MODE. 


( 


f 


3885 
3886 


017400 
017400 


104413 




EEE8 5 


LPERR 




jSET UP THE LOOP ON ERROR ADDRESS, 


4 




3887 
3888 


017402 
017406 


004737 
040342 


017654 
000000 


_____ 

1$; 


JSR 
.WORD 


PC,§#MULFSUB 
40342,0 


?AC 




• 


3889 
3890 


017412 
017416 


176542 
176707 


000000 
102000 


2$: 
3$ ; 


.WORD 
.WORD 


176542t 
176707, 102000 


?FSRC 
?RES 


I 


4 


3891 
3892 


017422 
017424 


000007 
000010 




4$ s 


7 

10 




?FPS BEFORE EXECUTION, 
;FPS AFTER EXECUTION, 


1 




3893 
3894 


017426 
017432 


076507 
104041 


102000 


7$: 
6$ : 


.WORD 

ERROR 


76507,102000 
41 


? ERROR RiS, 
?BAD SIGN, 




1 


3895 
3896 








SMULF 


WITH AC 


NEGATIVE AND FSRC 


POSITIVE IN ROUND MODE. 


4 


i 


3897 
3898 


017434 
017434 


104413 




EEE9 i 


LPERR 




;SET UP THE LOOP ON ERROR ADDRESS, 


i 




3899 
39O0 


017436 
017442 


004737 
140200 


017654 

000000 


1$: 


JSR 
« WORD 


PC,e#MULFSUB 
140200,0 


J AC 




t 


3901 
3902 


017446 
017451. 


007417 
107417 


007417 
007417 


2$: 
3$: 


• WORD 
. WORD 


7417,7417 
107417,7417 


;FSRC 
;RES 


4 


1 


3903 
3904 


017456 
017460 


000000 
000010 




4$: 




10 




JFPS BEFORE EXECUTION, 
;FPS AFTER EXECUTION, 


« 




3905 
3906 


017462 
017466 


007417 
104041 


007417 


5$: 
6$s 


.WORD 

ERROR 


7417,7417 
41 


; ERROR RES. 
; BAD SIGN, 




t 


3907 
3908 








JMULF 


WITH BOTH OPERANDS NEGATIVE IN ROUND MODE, 


i 


1 


3909 
3910 


017470 
017470 


104413 




EEE10? 


LPERR 




jSET UP THE LOOP ON ERROR ADDRESS. 


1 



r 



t 


3911 

3912 


017472 
017476 


004737 
144600 


017654 

000000 


1$ : 


JSR 
• WORD 


PC* $#MULFSUB 
1 44600 , 


; AC 




3913 


017502 


154000 


000000 


2S * 


• WORD 


154000,0 


JFSRC 




3914 


017506 


060400 


000000 


3$S 


. WORD 


60400,0 


J RES 


e 


3915 
3916 


017512 
017514 


000017 
000000 




4$; 


17 





?FPS BEFORE EXECUTION. 
JFPS AFTER EXECUTION. 




3917 


017516 


160400 


oooooo 


5$: 


# WORD 


160400,0 


j ERROR RES. 


i 


3918 


017522 


104041 




6$: 


ERROR 


41 


J BAD SIGN. 




3919 
3920 








jmulf 


BOTH OPERANDS NEGATIVE IN 


ROUND MODE. 


I 


3921 
3922 


017524 

017524 


104413 


- — 


EEE 111 


LPERR 




j SET UP THE LOOP ON ERROR ADDRESS. 


1 


3923 
3924 


017526 
017532 


004737 
140300 


017654 
000000 


IS; 


JSR 
• WORD 


PC,§#MULFSUB 
140300,0 


; AC 




3925 


017536 


160000 


000001 


2$: 


• WORD 


160000,1 


?FSRC 




3926 


017542 


060100 


000002 


3$; 


.WORD 


60100,2 


jRES 


f 


3927 
3928 


017546 
017550 


000G10 
000000 




4 $ » 


10 





?FPS BEFORE EXECUTION. 
jFPS AFTER EXECUTION. 




3929 


01 7552 


060100 


000001 


5$ : 


.WORD 


60100, 1 


? ERROR RES, 


1 


3930 


017556 


104044 




6$ ! 


ERROR 


44 


jROUND {• A1LURE. 




3931 

3932 








SMULF 


WITH AC 


POSITIVE AND FSRC 


NEGATIVE IN TRUNCATE MODE. 




3933 
3934 


017560 
017560 


104413 




EEE 1 2 • 


LPERR 




;SEI UP THE LOOP ON ERROR ADDRESS, 




3935 


017562 


004737 


017654 




JSR 


PC,§#MULFSUB 






3936 


017566 


060000 


000001 


1$; 


. WORD 


60000, 1 


* AC 




3937 


017572 


140300 


OOOOOO 


2$; 


• WORD 


140300,0 


JFSRC 




3938 


017576 


160100 


000001 


3$; 


.WORD 


160100, 1 


j RES 




3939 
3940 


017602 
017604 


007547 
007550 




4$5 


7547 
7550 




jFPS BEFORE EXECUTION, 
? f PS AFTER EXECUTION. 




3941 
3942 


017606 
017612 


160100 
104045 


000001 


5$; 
6$ : 


.WORD 
ERROR 


160100,1 
45 


J ERROR RES. 
jIRUNCATION ERROR, 




3943 
3944 








?MULF 


WITH AC 


POSITIVE AND FSRC 


POSITIVE IN ROUND MODE, 




3945 
3946 


017614 
017614 


104413 




EEE 13* 


LPERR 




?SET UP THE LOOP ON ERROR ADDRESS, 




3947 
3948 


017616 
017622 


004737 
040277 


017654 

oooooo 


1$ ; 


JSR 
. kQRO 


PC,$#MULF$UB 

40277,0 


J AC 




3949 


017626 


060000 


000001 


2$; 


• WORD 


60000, 1 


?FSRC 




3950 


017632 


060077 


000001 


3$ ; 


.WORD 


60077, 1 


• RES 




3951 
3952 


017636 
017640 


000014 
000000 




4$: 


14 





jFPS BEFORE EXECUTION, 
jFPS AFTER EXECUTION. 




3953 
3954 


017642 
017646 


060077 
104044 


000002 


5$: 
6$; 


.WORD 
ERROR 


60077,2 
44 


j ERROR RES. 

;ROUND FAILURE. CONSTANT BAD. 




3955 
3956 


017650 


000167 


000224 




JMP 


EEEDONE 


J GO TO THE NEXT TEST. 



3957 
3958. 



? THIS SUBROUTINE, HULFSUB, IS CALLED TO SET UP, EXECUTE 

; AND CHECK THE RESULT OF A MULF INSTRUCTION. IT IS CALLED THUS? 



3959 

396jQl 



396! 
3962 



JSR PC,$#MULFSUB 
ACARG; .WORD X^X 



J AC OPERAND 



3963 
3964 



3965 
39.6A 



FSRCARG: .WORD X,X 
RES; .WORD X,X 



jFSRC OPERAND 
; EXPECTED RESULT 



FPSB: 
FPSA: 



. WORD 
• WORD 



5 FPS BEFORE EXECUTION 
SFPS AFTER EXECUTION 



rFP8A.pi i 



'QJFPJ|*A_ _ 
01-NOV 
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76 21S06 



T10 



MULF TEST 



3967 ; 

3968 i 


r ERRES J • WORD X,X « ERROR RESULT 
ERRS ERROR X J RESULT ERROR 


3969 J 

3970 J 


CONT? ? RETURN ADDRESS 


3971 J 

3972 ! 


•THE OPERANDS ARE SET UP (USING ACO FQR THE AC OPERAND) , THEN 
•FPSB IS LOADED INTO THE FPS. THE INSTRUCTION, MULF IS EXECUTED. 


3973 3 

3974 l 


1 AFTER THE EXECUTION THE RESULT IS CHECKED AGAINST THE 

; EXPECTED CORRECT RESULT, RES. IF IT IS CORRECT THEN THE FPS 


3975 ! 

3976 J 


fIS CHECKED WITH THE EXPECTED CORRECT FPS, FPSA, IF THE FPS WAS 
5 INCORRECT THEN IT IS REPORTED. IF THE RESULT WAS INCORRECT IT 


3977 1 

3978 ! 


llS COMPARED WITH ERRES IN AN ATTEMPT TO ANALYSE THE ERROR. IF 
• THE INCORRECT RESULT MATCHED ERRES THEN CONTROL IS PASSED TO 


3979 { 

3980 1 


►THE ERROR CALL AT ERR. IF THE INCORRECT RESULT DID NOT MATCH ERRES 
•THEN THE FAILURE IS REPORTED IN MULFSUB AND CONTROL IS PASSED TO 


3981 j 

3982 1 


•CONT, IF NO ERRORS ARE DETECTED THEN MULFSUB RETURNS CONTROL 
•TO CONT. 



♦ 



3983 
3984 



017654 012601 



MULFSUB 



MOV 



(SP)+#R1 



GET A POINTER TO THE ARGUMENTS 



3985 
3986 



017656 
017662 



012700 
170100 



000200 



MOV 
LDFPS 



#200, RO 
RO 



•SET FD MODE. 



3987 
3988 
3989 
3990 



017664 
017666 
017670 
017674 



010100 
17 2410 



016100 
170100 



000014 



MOV 

LDP 
MOV 
LDFPS 



Rl f RO 
(R0),AC0 



\ LOAD THE AC OPERAND. 



14(RI),R0 
RO 



? LOAD THE FPS 



3991 
3992 



017676 
017704 



012737 
010100 



017712 001236 



MOV #l$ f §#$TMP2 
MOV R1,R0 



3993 

112± 



017706 062700 000004 



ADD 



#4,R0 



j ESTABLISH A POINTER TO FSRC 



3995 
3996 



017712 171010 



1$ 



MULF 



(R0),AC0 



J TEST INSTRUCTION. 



3997 
3998 



017714 
017716 



170204 
012700 



000200 



STFPS 
MOV 



R4 

#200, RO 



J GET 
?SET 



THE FPS 
FD MODE 



3999 
4000 



017722 170100 



LDFPS 



RO 



4001 
4002 



017724 
017730 



012700 
174010 



020070 



MOV 
STD 



4003 
4Q04 



01773J 010102 



MOV 



#MULFT,R0 
ACO,(RO) 

R1,R2 



? GET THE RESULT OF THE MULF, 



JSAVE THE DATA IN CASE OF ERROR 



4005 
4006 



4007 
4008 



017734 
017740 



010237 
062702 



001240 
00QQ04 



017744 
017750 



MOV R2,##$TMP3 
ADD #4,R2 



010237 
062702 



4009 
40iO_ 



017754 
017760 



001242 
000004 



MOV R2,##STMP4 
ADD #4,R2 



010237 
012737 



401 1 
4012 



017766 
017772 



001244 
020070 



001246 



010437 
016137 



MOV R2,@#$TMP5 
MOV tMULFT,@#$TMP6 



001250 
000016 



001252 



MOV R4,£#$TMP7 

MOV 16(R1), §#$TMP10 



4013 
4014 



02000 021061 000010 



CMP 



4015 
4016 



020004 
020006 



001011 
026061 



000002 000012 



6NE 
CMP 



(RO) 



10$ 

2(R0) # 12(R1) 



IS THE RESULT CORRECT? 



IF INCORRECT BRANCH. 



4017 
4018 
4019 
4Q2Q 



020014 001005 



BNE 



10$ 



020016 
020022 



026104 
001020 



000016 



CMP 
BNE 



16(R1),R4 
15$ 



SIS FPS CORRECT? 

;IF INCORRECT BRANCH. 



4021 

4Q22 



020024 000161 000026 



JMP 



26(R1) 



IF NO ERRORS OCCURRED RETURN 



i 



i 
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4023 

4024 



020030 
020034 



021061 
001010 



000020 



10S: 



CMP 
BNE 



4025 
4026 



020036 
020044 



026061 
001004 



000002 000022 



4027 
4028 
4029 
40 30 



020046 010102 



020050 062702 000024 



CMP 
BNE 

MOV 

ADD 



(RO)t 20(R1) 

11$ _ 

2(R0),22(RT) 

ill 

R1,R2 

#24, R2 



JDOES THE INCORRECT RESULT 

; NATCH THE ANTICIPATED INCORRECT RESULT, 

? BRANCH IF NO* 



;IT HATCHED SO RETURN TQ THE ERROR 



; REPORT AT THE CALLING ROUTINE, 



4031 
4032 



020054 000112 



JMP 



(R2) 



4033 
4Q34 
4035 

Mi 



020056 
02OO56 



JMMI 



020060 000161 000026 



11$; 

12,1 

13$; 



J REPORT RESULT INCORRECT, 



ERROR 
JMP 



11 
26CR1) 



4037 
4038 



020064 
020064 



104040 



15$; 
16$; 



j REPORT FPS INCORRECT, 



ERROR 



40 



4039 
4040 



020066 000774 



8R 



13$ 



4041 
4042 



020070 
020076 



000000 
000000 



oooooo oooooo mulft; .word o,o,o,q 



4043 
4044 



020100 



EEED0NE: 



4045 
4046 



020100 104412 



RSETUP 



;G0 INITIALIZE THE FPS AND STACK j AND 
;SEE IF THE USER HAS EXPRESSED 



4047 

4048 



jTHE DESIRE TO CHANGE THE SOFTWARE 

; VIRTUAL CONSOLE SWITCH REGISTER (HAS 



4049 
4Q5Q 



? THE USER TYPED CONTROL G?) f 



4051 



4053 j 

4054 ! 


i ;########*#########♦#########*##♦##########♦####**####*♦#*##**## 
!#TEST 11 MULD TEST 


4055 j 

4056 J 


»# 

•*THIS IS A TEST OF THE MULD INSTRUCTION, NOTE THAT A SUBROUTINE IS 


4057 j 

4058 : 


'#USED TO SET UP THE OPERANDS, EXECUTE THE MULD INSTRUCTION AND 
!*CHECK THE RESULTS. 


4059 ; 

4060 ! 


• * 



4061 


020102 


000004 




TSTU ; 


SCOPE 






4062 
















4063 








?MULO 


TEST WITH 


AC POSITIVE AND 


FSRC POSITIVE, 


4064 


020104 






FFF1 : 








4065 


020104 


104413 






LPERR 




f SET UP THE LOOP ON ERROR ADDRESS, 


4066 


020106 


004737 


020370 




JSR 


PC,e#MULDSUB 




4067 


020112 


040200 


oooooo 


OOOOOO 1$; 


, WORD 


40200,0,0,0 


JAC 


4068 


020120 


OOOOOO 












4069 


020122 


02377 7 


177777 


177777 2$S 


,WORD 


23777,-1,-1,-1 


;FSRC 


4070 


020130 


177777 












4071 


020132 


023777 


177777 


177777 3$; 


• WORD 


23777,-1,-1 ,-1 


?RES 


4072 


020140 


177777 












4073 


020142 


000217 




4$; 


217 




?FPS BEFORE EXECUTION. 


4074 


020144 


000200 






200 




JFPS AFTER ECECUTION, 


4075 


02014b 


023777 


177777 


OOOOOO 5$: 


.WORD 


23777,-1,0,0 


; ERROR RES. 


4076 


020154 


Q0OOOO 












4077 


020156 


104047 




6$: 


ERROR 


47 


? BAD CONSTANT USED IN ALGORITHM 


4078 














;USED 24 INSTEAD OF 56. 



ILj 


MNPLC 


• H-pFFPE 


l-A 
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?tp8a,pii oi 


-N0V-76 


2 ! !06 




Til 


MULD TEST 






1 


4079 
4Q80 










? MULD 


TEST WITH 


BOTH OPERANDS POSITIVE TRUNCATION TEST. 






4081 
4082 


020160 
020160 


104413 






FFF2: 


LPERR 




?SET UP THE LOOP ON ERROR ADDRESS, 




1 


4083 
4084 


020162 
020166 


004767 
065400 


000202 
000000 


000000 


_JL£l_ 


JSR 
.WORD 


PC,MULDSUB 
65400, 0# Of 1 


J AC 




1 


4085 
4Q86 


020174 
020176 


000001 
037577 


1 77777 


177777 


2$ : 


• WORD 


37577,-1 ,-1,-2 


?FSRC 






4087 
4086 


020204 
020206 


177776 
064777 


177777 


177777 


3$ : 


• WORD 


64777,-1,-1,-1 


JRES 




J 1 


4089 
4090 


020214 
020216 


177777 
000247 


— — — — 




4$ ; 


247 




?FPS BEFORE EXECUTION , 




4 


4091 
4092 


020220 
020222 


000240 
065000 


000000 


000000 


5$ s 


240 
.WORD 


65000,0,0,0 


jFPS AFTER EXECUTION. 
; ERROR RES. 






4093 
4094 


020230 
020232 


000000 
104050 


— ■ 




6$ : 


ERROR 


50 


; TRUNCATION ERROR. 




Ml 

f 


4095 
4096 








— — — — — 


JMULD 


TEST WITH 


BOTH OPERANDS NEGATIVE IN ROUND MODE. 




t 


4097 
4098 


020234 
020234 


104413 






FFF3: 


LPERR 




?SET UP THE LOOP ON ERROR ADDRESS. 






4099 
4100 


020236 
020242 


004737 
137577 


020370 
177777 


177777 


1$ I 


JSR 
.WORD 


PC, §#HULDSUB 
137577,-1,-1,-2 


?AC 




• 


4101 


020250 
020252 


177776 
165400 


000000 


000000 


2$ : 


.WORD 


165400,0,0,1 


?FSRC 




1 


4103 
4104 


020260 
020262 


000001 
065000 


000000 


000000 


3$ * 


• WORD 


65000,0,0,0 


?RES 






4105 
4106 


020270 
020272 


000000 
007717 






4$ ; 


7717 




?FPS BEFORE EXECUTION, 




i 


4107 

4j#8 


020274 
020276 


007700 
064777 


177777 


177777 


5$ 5 


7700 
. WORD 


64777,-1,-1 ,-1 


?FPS AFTER EXECUTION, 
JERROR RES. 




1 


4109 
4110 


020304 
020306 


177777 

104051 







6$; 


ERROR 


51 


GROUND ERROR • 






4111 
4112 








: : 


snuld 


TEST WITH AC POSITIVE AND FSRC NEGATIVE IN ROUND MODE. 




M 

1 


4113 
4114 


020310 
020310 


104413 






FFF4! 


LPERR 




?SET UP THE LOOP ON ERROR ADDRESS, 




« 


4115 
4116 


020312 
020316 


004737 
017500 


020370 
000000 


000000 


1$ : 


JSR 
. WORD 


PC,f»#MULDSUB 
17500,0,0,0 


;ac 






4117 
4118 


020324 
020326 


000000 
123652 


125252 




2$; 


• WORD 


123652,125252 


?FSRC 




• 


4119 
4120 


020332 
020336 


125252 
103*77 


125252 
177777 


177777 


3$: 


.WORD 
.WORD 


125252,125252 
103177,-1 ,-1^-1.. 


?RES 




1 


4121 
4122 


020344 
020346 


177777 
000200 


— „ . 




4$ S 


200 




;FPS BEFORE EXECUTION , 






4123 
4124 


020350 
020352 


000210 
103200 


000.00.0 


0J3.Q00O 


5$S 


210 
. WORD 


103200,0,0,0 


;FPS AFTER EXECUTION. 
; ERROR RES. 




c 


4125 
4126 


020360 
020362 


000000 
104052 




— — — 


6$: 


ERROR 


52 


?ROUND ERROR ( BAD CONSTANT). 






4127 
4128 


020364 


000167 


A /X A A £ A 

000240 






JMP 


FFFDONE 








4129 
4130 










JTHIS 


SUBROUTINE 


, MULDSUB, IS CALLED TO SET Up, EXECUTE 




€ 


4131 
4132 










; AND < 

• 
* 


CHECK THE RESUliT OF A MULD 


INSTRUCTION, IT IS CALLED THUS S 





4133 

4JLU_ 



JSR 

ACARGi .WORD 



PC,##MULDSUB 
.X , X , x , X 



;AC OPERAND 
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Til 



muld TEST 



4135 ! 

4136 S 


FSRCARG: .WORD X,X,X,X J 
f RES? .WORD X,X,X,X 1 


FSRC OPERAND 
[EXPECTED RESULT 


4137 J 

4138 ! 


FPSB: . WORD X J 
; FPSA; .WORD X 


fFPS BEFORE EXECUTION 
;FPS AFTER EXECUTION 


4139 J 

4140 3 


t ERRES : .WORD X,X,X,X i 

ERR ! ERROR X J 


f ERROR RESULT 
! RESULT ERROR 


4141 : 

4142 i 


CONT; ! 


f RETURN ADDRESS 


4143 ! 

4144 S 


;THE OPERANDS ARE SET UP (USING ACO FOR THE AC OPERAND) , THEN 
• FPSB IS LOADED INTO THE FPS. THE INSTRUCTION* MULD IS EXECUTED, 


4145 1 

4146 ! 


' AFTER THE EXECUTION THE RESULT IS CHECKED AGAINST THE 

t EXPECTED CORRECT RESULT, RES. IF IT IS CORRECT THEN THE FPS 


4147 1 

4148 1 


'IS CHECKED WITH THE EXPECTED CORRECT FPS f FPSA, IF THE FPS WAS 
•INCORRECT THEN IT IS REPORTED. IF THE RESULT WAS INCORRECT IT 


4149 1 

... n$$ j 


SIS COMPARED WITH ERRES IN AN ATTEMPT TO ANALYSE THE ERROR* IF 
! THE INCORRECT RESULT MATCHED ERRES THEN CONTROL IS PASSED TO 


4151 3 

4152 ! 


\ THE ERROR CALL AT ERR t IF THE INCORRECT RESULT DID NOT MATCH ERRES 
f THEN THE FAILURE IS REPORTED IN MULDSUB AND CONTROL IS PASSED TO 



4153 










jCONT. IF NO 


ERRORS ARE DETECTED 


THEN MULDSUB RETURNS CONTROL 


4154 










;TO CONT. 






4155 
4156 


020370 


012601 






MULDSUB; 


MOV (SP)+#R1 


ftsEj. A PUiNlltK 10 Int, AKv»UMc.N 1 o . 


4157 


020372 


At OT Art 

01 I fOQ 


A A A **J A A 

000200 




"U V 


* A A DA 
I <UU , KU 


(O&l VU nUU&t 


4158 


020376 


170100 






t i% t 1 ^ r\ p 

LDr PS 


RO 




4159 
4160 


020400 


A 4 A A A 4\ 

010100 






MOV 


RlfRO 


J SET UP THE ACO OrtRANP. 


4161 
416? 


f\ n f\ A il\ T- i 

02U$02 
020404 


1 / 4*t% U 

016100 


000030 




MOV 


/DAI Rffl 

30CR1 ) ,RQ 


JLOAD THE FPS, 


4163 


020410 


170100 






LDFPS 


RO 




4164 
















A a £ £. 

4166 


A O A A 1 "3 
U i V ** I £ 

A *^ A A "5 A 

020420 


A < A 4 A A 

010100 


A*>A AO*, 


A A 1 *>lh 


MU V 

un w 
V 


D 1 DA 


5&01»Oi440rj h ruimitp j,u rPPw, 


4167 


020422 


062700 


000010 




ADD 


1 1 Of RO 




4168 
















4169 


020426 


171010 






1$ S MULD 


(R0),AC0 


?EXECUTE THE TEST INSTRUCTION, 


4170 
















4171 


020430 


170204 






STFPS 


R4 


! GET THE FPS, 


4172 


020432 


012700 


000200 




MOV 


#200, RO 


?SET FD MODE, 


4173 


020436 


170100 






LDFPS 


RO 




4174 
















4175 


020440 


012700 


020620 




NOV 


#muldt,ro 


JGET THE RESULT, 


4176 


020444 


174010 






STD 


ACO, CRO) 




4177 
4178 


020446 


010102 






MOV 


R 1 , R 2 


;SAVE DATA IN CASE OF ERROR , 


4179 
4180 


020450 
020454 


010237 
062702 


001240 
QOQO10 




MOV 
ADD 


R2,8#$TMP3 
#10, R2 




4181 


020460 


010237 


001242 




MOV 


R2,e#$TMP4 




4182 


020464 


062702 


000010 




ADD 


#10, R2 




4183 


020470 


010237 


001244 




MOV 


R2,(^#$TMP5 




4184 


020474 


012737 


020620 


001246 


MOV 


#MULDT f ##$TMP6 




4185 


020502 


010437 


001250 




MOV 


R4,*a#$TMP7 




4186 


020506 


016137 


000032 


001252 


MOV 


32(R1 ),§#$TMP10 




4187 
4188 


020514 


010102 






MQV 


R1,R2 


;CHECK the result. 


4189 


020516 


062702 


000020 




ADD 


#20, R2 




4190 


0.20522.. 


01.2703 


030.620. 




MOV 


#MULDT,R3 
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- 1 , i 





4191 


020526 


012705 


A A A A A A 

000004 








# 4 , R5 




i 


4192 


020532 


022223 






2$ ; 


cmp 


(R2)*, (R3)+ 






4193 


020534 


001006 




— — ■ 




BNE 


10$ 


J BRANCH IF RESULT INCORRECT, 




il£4 _ 


020536 


077503 








SOB 


R5 # 2$ 




1 


4195 
4196 


020540 


026104 




000032 






CMP 


32CRl),R4 


; IS FPS CORRECT? 


1 
1 


4197 


020544 


001023 









BNE 


4 C A 

15$ 


J BRANCH IF I NCURRECT , 


4198 


. 02.0.546 „ 


000161 


000046 


— 




tJMP 


46CR1 ) 


; RETURN , 


< - 


4199 
4200 


020552 


A A A 4 A 

010102 






10$ ; 


MOV 


Rl , R2 


? W AS INCORRECT RESULT ANT it- iP A l Eu? 


4201 


020554 


062702 


000034 






ADD 


#34, R2 






4202 


020560 


012703 


020620 




— — — ~ 


NOV 


INULDTf R3 




* 


4203 


020564 


01 2705 


A A A A A\ M 

000004 






MOV 


# 4, R5 




4204 


020570 


022223 






lis: 


CWP 


CR2)+, (R3)+ 






4205 


020572 


001005 








BNE 


12$ 


; BRANCH IF NO. 




4206 


020574 


077503 








SOB 


R5, 1 1 $ 




I 


4207 
4208 


020576 
020600 


A i /"V 4 A *i 

010102 
062702 


A A A A £ 4 

000044 






ADO 


R I , R / 
# 44, R2 


; ir THE iwCURRECi KESUiil WAo 
JANTICIPAIED RETURN TO THE 


1. 


4209 
















j ERROR REPORT IN THE CALLING 


4210 


A A A »="' A it 

020604 


A A A A M f\ 

0001 12 








JMP 


(R2 ) 


J ROUTINE, 




421 1 
4212 


A A A rf" A /** 

020606 








12$; 






fREPORT RESULT INCORRECT. 


i 


4213 


020606 


104246 






13$: 


ERROR 


246 






4/14 


ft ) A t 1 A 


A A A i £.1 

0001 O 1 


000040 








%0 \ K I J 




4 


4215 
4216 


020614 








15$: 






f REPORT FPS INCORRECT, 




4217 


020614 


104046 






16$: 


ERROR 


46 






4218 


020616 


000774 








BR 


14$ 




ff 


4219 
4220 


020620 


000000 


000000 


000000 


HULDT: 


.WORD 


0,0,0,0 





4221 020626 

1222 

4223 
4224 



000000 



020630 
020630 



FFFD0NES 



104412 



RSETUP 



;G0 INITIALIZE THE FPS AND STACK? AND 



4225 
4226 
4227 
4228 



?SEE IF THE USER HAS EXPRESSED 
?THE DESIRE TO CHANGE THE SOFTWARE 



? VIRTUAL CONSOLE SWITCH REGISTER (HAS 
; THE USER TYPED CONTROL G? ) « 



4229 
4230 



4231 
4 2 3 2 



4233 
4234 



S#TEST 12 



UNDERSOVER FLOW, USING MULF WITH TRAPS DISABLED, TEST 



4235 
4236 



?*THIS IS A TEST OF THE OVERFLOW AND UNDERFLOW CONDITIONS USING 

; #THE MULF INSTRUCTION WITH TRAPS DISABLED, NOTE THAT A SUBROUTINE 



4237 
4238 



j*IS USED TO SET UP THE OPERANDS, EXECUTE THE MULF INSTRUCTION AND 
;»CHECK THE RESULTS . 



4239 
4240 



• * 



4241 

JL242. 



020632 000004 



TST12: SCOPE 



4243 
4244 



020634 



JUNDERFLOW, WITH EXPONENT OF RESULT = -129 

nil: 



4245 
4246 



020634 
020636 



104413 
004737 



021060 



LPERR 
JSR 



JSET UP THE LOOP ON ERROR ADDRESS. 



PC,9#OVUNFNT 



AINDEC 


-U-DFFP6 




PDP 11/ 34 


FPP DIAGNOSTIC 


: PART 2 


MACXU 27(1006) 


07-FEB-77 12:06 PAGE 78 


FFPBA.PU Oi 


•»N0V~76 


21 5 06 


Tl 2 


UNDER\OVER FLOW, USING 


MULF WITH TRAPS DISABLED, TEST 


4247 

4248 


020642 
020646 


020200 
020000 


000000 
000000 


1$ i 

2 $ * 


, WORD 
• WORD 


20200,0 
20000, 


? AC 
yFSRC 


4249 
4250 


020652 
020656 


000000 
177777 


000000 
177777 


3$ ; 
4$; 


. WORD 
# WORD 


0,0 
• 1,-1 


; RES 

f ERROR RES. 


4251 
425? 


020662 
020664 


000000 
000004 




5$: 



4 




;FPS BEFORE EXECUTION. 
;FPS AFTER EXECUTION. 


4253 
4254 


020666 
020670 


000012 
177777 




6$ ; 


12 
-1 




?FEC 
! FLAG 


4255 
4256 


020672 
020674 


104H7 
000401 




7$: 


ERROR 
BR 


117 

8$ 


jST 331 TO 155 INTO 115 (BUT FIU) 


4257 
4258 


020676 
020700 


104114 




8$; 


ERROR 


114 




4259 
4260 








^UNDERFLOW, ¥IT¥ 


[ EXPONENT OF RESULT 9 -193 


4261 
4262 


020700 
020700 


104413 




1 1 1 2 * 


LPERR 




;SET UP THE LOOP ON ERROR ADDRESS* 


4263 
4264 


020702 
020706 


004737 
010200 


021060 
000000 


1$: 


JSR 
.WORD 


PC,§#OVUNFNT 
10200,0 


?AC 


4265 
4266 


020712 
Q2071O 


OiOOOO 
000000 


000000 
000000 


2$: 
3$: 


• WORD 
.WORD 


10000,0 
0,0 


JFSRC 
?RES 


4267 

4268 


020722 
020726 


010000 
005013 


000000 


4$; 
5$ ; 


# WORD 
5013 


10000,0 


J ERROR RES. 

?FPS BEFORE EXECUTION, 


4269 
4270 


020730 
020732 


005004 
000012 




6s; 


5004 
12 




?FPS AFTER EXECUTION. 
?FEC 


4271 
4272 


020734 
020736 


177777 
104120 




7$ s 


~1 

ERROR 


120 


I FLAG 

^SETTING FIUV OR FIV CAUSES TRAP 


4273 
4274 


020740 


000401 






BR 


8$ 


jWITH FIU CLEAR. 


4275 
4276 


020742 
020744 


104114 




8$: 


ERROR 


114 




4277 
4278 








lOVERFLQW, EXPONENT OF RESULT » 


128 


4279 
428J? 


020744 
020744 


104413 




III3S 


LPERR 




;SET UP THE LOOP ON ERROR ADDRESS. 


4281 
4282 


020746 
020752 


004737 
060200 


021060 
000000 


1$: 


• WORD 


PC#e*OVUNFNT 

60200,0 


;AC 


4283 
4284 


020756 
020762 


060000 
000000 


000000 
000000 


2$2 

3$: 


. WORD 
.WORD 


60000,0 
0,0 


?FSRC 
?RES 


4285 
4296 


020766 
020772 


060000 
000000 


000000 


4$: 
5$: 


.WORD 



60000,0 


? ERROR RES. 

;FPS BEFORE EXECUTION, 


4287 
4288 


020774 
020776 


000006 
000010 




6$: 


6 

10 




?FPS AFTER EXECUTION, 
?FEC 


4289 
4290 


021000 
021002 


000000 
104121 




7$: 




ERROR 


121 


JFLAG 

;ST 333 TO 136 INTO 116 (BUT FIV), 


4291 
4292 


021004 
021006 


000401 
104H3 






BR 

ERROR 


8$ 
113 




4293 
4294 


021010 






8$: 








4295 
4296 


021010 






OVERFLOW, EXPONENT OF RESULT » 

III4: 


130 


4297 
4298 


021010 
021012 


104413 
004737 


021060 




LPERR 
JSR 


PC,£#OVUNFNT 


JSET UP THE LOOP ON ERROR ADDRESS, 


4299 
43»Q 


021016 
021022 


060200 
060200 


000000 
000000 


1$; 

2$5 


.WORD 
.WORD 


60200,0 
60200,0 


jAC 

JFSRC 


4301 


021026 
021032 


000000 
177777 


000000 
177777 


3$: 
4$? 


.WORD 
. WORD 


0,0 
-1,-1 


JRES 

; ERROR RES. 



1 



IAINDEO 1 l^DFFPB-A 



»FFpBA,pll 



Ot-NOV-76 2l!06 
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UNDERCOVER FLQW, USING MULF WITH TRAPS DISABLED, TEST 



4303 
4304 



021036 
021040 



006011 

006006 



4305 
4306 



021042 
021044 



000010 
Q0O0O0 



4307 
4308 



021046 104122 



4309 
iili 



021050 
021052 



000401 
104113 



4311 
4312 



021054 000167 000410 



4313 



T12 



5$ 



6011 
6006 



?FPS BEFORE EXECUTION, 
;FP5 AFTER EXECUTION , 



6$ 



10 




jFEC 
? FLAG 



7$ 



ERROR 



122 



? SETTING FIUV OR FIU WITH 
;FIV CLEAR CAUSES TRAP, 



BR 

ERROR 



8$ 
113 



8$; 



JMP 



IIIDONE 



?G0 TO NEXT TEST, 



4315 ! 

4316 ! 


ITHIS SUBROUTINE, OVUNFNT, IS USED TO SET UP THE OPERANDS # EXECUTE 

; THE MULF INSTRUCTION AND CHECK THE RESULTS OF AN INSTRUCTION WITH ( 


4317 1 

4318 1 


►OPERANDS WHICH SHOULD RESULT IN EITHER OVERFLOW OR UNDERFLOW, A CALL 
• TO IT IS MADE THUS? 


4319 j 

4320 J 


i 

ACARG: • WORD X#X fAC OPERAND 


4321 J 

4322 1 


FSRCARG; .WORD X,X ?FSRC OPERAND 
', RES 8 . WORD X, X s EXPECTED RESULT \ 


4323 1 

4324 1 


t ERRES: .WORD A,X ? ERROR RESULT 

? FPSB5 . WORD X jFPS BEFORE EXECUTION 


4325 1 
432b 


1 FPSA: ,WORD X ;FPS AFTER EXECUTION i 
i FEC : • WORD X j EXPECTED FEC 


4327 S 
4328 


i FLAGS .WORD X f 0/*l , OVER/UNDER FLOW FLAG 

\ ERRl: ERROR X ?TRAP ERROR, 1 


4329 
4330 


\ BR CONT 

f ERR 2 S ERROR X jDATA, RESULT ERROR 


4331 

4332 ! 


f CONTS ? RETURN ADDRESS 


4333 ) 
4334 


fTHc, □Pft.RANUS ARt £>fe,T UP lUSlNls AvU Aib inc. ALLUMUliA J.UK J , Jtn&W 
?THE MULF INSTRUCTION IS EXECUTED. IF NO TRAP OCCURS THEN THE 


4335 1 

4336 i 


^RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS IS 
ICOMPARED WITH FPSA IF THIS TOO IS CORRECT 0VUNFNT RETURNS CONTROL 


4337 S 

4338 ! 


;TO THE CALLING ROUTINE AT CONT, IF THE FPS IS BAD OVUNFNT 

• REPORTS THIS FAILURE AND THEN RETURNS TO CONT. IF THE RESULT OF THE 


4339 J 

4340 j 


• MULF IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 
•ANTICIPATED FAILING DATA PATTERN, ERRES, IF THE FAILURE IN 


4341 j 

4342 j 


•THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN OVUNFNT 
'WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR2, OTHERWISE THE 


4343 J 

4344 ! 


RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND OVUNFNT WILL 
•REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


4345 ! 

4346 ! 


•IE A TRAP OCCURS (IT SHOULD NOT) THEN OVUNFNT WILL READ THE FEC. 
ISHOULD THE FEC MATCH THE ANTICIPATED FEC OVUNFNT WILL 


4347 j 

4348 : 


ISTORE ALL DATA AND TRANSFER CONTROL TO THE ERROR CALL AT ERRl. IF THE 
iFEC IS NOT THE SAME AS THE ANTICIPATED FEC OVUNFNT WILL REPORT 


4349 j 

4350 s 


•THE ERROR AND RETURN TO CONT, NOTE THAT OVUNFNT USES THE FLAG 
•TO TELL WHETHER OR NOT THESE PARTICULAR OPERANDS WILL RESULT IN 


4351 j 


UNDERFLOW (FLAG=-1) OR OVERFLOW (FLAG=0) , 



4352 



4353 
4354 



021060 
021062 



012601 
012700 



000200 



OVUNFNT: MOV (SP)+,R1 ?GET A POINTER TO THE ARGUMENTS. 
MOV #200, RO ?SET FD MODE. 



4355 
4JL5JL 
4357 
4358 



021066 170100 



021070 
021072 



010100 
172410 



LDFPS 



RO 



MOV 
LDD 



R1,RG 
(RO) , ACQ 



? LOAD ACO, OPERAND. 





4AINDEC 


•11-DFFPE 




PDP 11/34 FPP 


DI AGNOST I 


C PART 


2 N AC'X 1 1 27( 1006) 


07-FES-77 12:06 PAGE 80 


mr — 


}FFP8A«>Pl 1 01 


•N0V-76 


21506 




T12 


UNDER\OVER FLOW, USING 


NULF WITH TRAPS DISABLED, TEST 


€ 


4359 
4360 


021074 


010102 




— 




NOV 


Rl , R2 


t SAVE THE DATA PATTERNS IN CA$E OF 




4361 
4362 


021076 
021 102 


010237 
062702 


001240 
000004 






NOV 
ADD 


R2, ©#$TMP3 
#4, R2 


; ERROR. 


1 


4363 
4364 


021106 
021 112 


010237 
062702 


001242 
000004 






MOV 
ADD 


R2,##$TMP4 
*4,R2 




1 


4365 
4366 


021116 
021122 


010237 
016137 


001244 
000022 


001252 




NOV 
NOV 


R2, §#$TMP5 
22CR1 ) , 8#$TMP10 






4367 
4368 


021130 


012737 


021460 


001246 




NOV 


lOVFNTT, @# $TNP6 




t 


4369 
4370 


021136 
021142 


016100 
170100 


000020 






NOV 
LDFPS 


20(R1), RO 
RO 


JLOAD THE FPS. 


f 


4371 
4372 


021144 
021152 


012737 
012737 


021166 
021352 


001236 
000244 




NOV 
NOV 


tl$,§#$THP2 
#25$,|>#FPVECT 


j SET UP THE FP TRAP VECTOR IN CASE 




4373 
4374 


021 160 


010100 








NOV 


Rl , RO 


JQF ERROR. 

^COMPUTE THE ADDRESS OF FSRC. 


1: 


4375 
4376 


021162 


062700 


000004 






ADO 


#4,ao 




1 


4377 
4378 


021166 


171010 






1$; 


MULF 


(RO)rACO 


JTEST INSTRUCTION * 




4379 
4380 


021170 
021172 


170204 
170305 






2$ ; 


STFPS 
STST 


R4 

R5 


?GET FPS, 
f GET FEC. 


i 


4381 
4382 


021174 
021200 


01 2700 
170100 


000200 






NOV 
LDFPS 


#200, RO 

RO 


; SET FD MODE. 


f 


4383 
4384 


021202 
021 206 


01 2700 
174010 


021460 






NOV 
STD 


#OVFNTT,R0 
ACO, (RO) 


?GET THE RESULT, 




4385 
4386 


021210 
021214 


010437 
010537 


001250 

A A 4. A M 

001 254 






NOV 
MOV 


R4,£f $TMP7 
R5, @#$TMPl 1 




1 


4387 
4388 


A A A A; *% A 

021 220 


012700 


021 460 






NOV 


lOVFNTT, RO 


JCHECK THE RESULT. 


€ 


4389 
4390 


021224 
021226 


A M A 41 A A; 

010102 
062702 


000010 






NOV 
ADD 


R1,R2 
#10, R2 






4391 
4392 


021232 
021236 


012703 
022022 


000002 




3$: 


NOV 

Cnp 


#2,R3 

(R0)+ f (R2)+ 






4393 
4394 


021240 
021242 


001015 
077303 








8NE 
SOB 


15$ 
R3, 3$ 


? BRANCH IF INCORRECT. 


« 


4395 
4396 


a a 4 A M M 

021244 


026104 


A A A A A A 

000022 






CHP 


22(R1),R4 


?WAS FPS CORRECT? 




4397 
4398 


021250 


001002 








BNE 


10$ 


jBRANCH IF FPS IS INCORRECT. 


i 


4399 
4400 


021252 


000161 


000036 




4$ S 


JNP 


36(R1) 


JRETURN, TEST COMPLETED. 


i 


4401 
4402 


021256 


005761 


000026 




? REPORT 

io$; 


INCORRECT FPS. 
TST 26(R1) 


;WAS THE RESULT OVER OR UNDER FLOW? 




4403 
4404 


021262 

„ — 


001002 








BNE 


12$ 


jBRANCH IF UNDERFLOW. 


1 


4405 
4406 


021264 


1Q4U1 






11$: 


ERROR 


111 


JREPORT FPS BAD AFTER OVERFLOW. 


4 


4407 
4408 


021266 


000771 








8R 


4$ 






4409 
4410 


021270 
021270 


104112 






12$; 
13$: 


ERROR 


112 


; REPORT FPS BAD AFTER UNDERFLOW. 


1 


4411 


021272 


000767 








BR 


4$ 




1 


441 3 
4414 


021274 


012700 


021460 




; RESULT 

15$: 


INCORRECT. 

NOV lOVFNTT, RO 


?SEE IF FAILURE IS ANTICIPATED 
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4415 


021300 


010102 






MOV 


R1,R2 


jFAILURE, 




441 6 


021302 


062702 


000014 




ADD 


# 1 4, R2 


i 




4417 


02 1 i06 


01^/03 


A A A A A 1 

000002 


— - -•— - 


M II 1/ 

MO V 








441 8 


021312 


0220,22 




16$ ; 


CMP 


(R0)+* ( R2) + 




« 


4419 


021314 


001007 






8NE 


17$ 


t BRANCH IF NOT ANTICIPATED. 1 




4420 


021316 


077303 






SOB 


R3# 16$ 




1 


4421 
4422 


A A A A A 

021320 


01 0102 






MOV 


Rl , R2 


• cnnnn nine AnWTf'Tnunpn cn DL''iiiiOM i 

JERROR WAS ANTICIPATED 50 RETUHN i 




4423 


021322 


062702 


000034 




ADD 


# 34* R2 


jlO THE ERROR REPORT IN THE CALLING 




4424 


021326 


010237 


001236 _ 




MOV 


R2, P#$TMP2 


; ROUTINE, 


4 


4425 
4426 


021332 


000112 




■ 


JMP 


(R2) 


i 




4427 
4428 


021334 


005761 


000026 


17$; 


TST 


26CR1) 


JRESULT WAS NOT ANTICIPATED 

;S0 ERROR MUST BE REPORTED HERE, \ 




4429 





_ — _ — 


— _ __ 












4430 














JHAVE RESULTED IN UVe.Hr LOW UR UwufcH 


4 


4431 
4432 


021 340 


A A 41 A 

001002 




— 


BNE 


19$ 


?FL0^ LOOKING AT THE FLAG, \ 
JdRAWCH If UWUCfKr LUw tArtv 


A 
1 


A A 1 *i 

4433 

A A "% It 

4434 








— ; _____ — - 






iHtrUHl KCoUL* lNvUHH.tv.ii RArLvAiNu \ 




4435 


021342 


104113 




18$; 


ERROR 


113 


jOVERFLOfo, 




4436 


021 344 


000742 








4$ 




C 


4437 
4438 


021 346 






19$ ; 






1 

•REPUR1 Ht»iS>ULi INuURHt-CA, fc.AFbt. I INv* 


A 

1 


4439 


021346 


104114 




20$: 


ERROR 


114 


j UNDERFLOW , 


4440 


021350 


000740 






BR 


4$ 


1 




4441 
4442 








? IF AN 


FP TRAP 


OCCURS COME HERE, 




I 


A A A 

444 3 
4444 


021 452 
021354 


011602 
022702 


021*70 


23$ I 


"U v 

CMP 


C or j t K4 

#2$_f R2 


J vib 1 Al/UrsCOO U" lKftr* « 
JWAS THE lKAr UUKINb IMt MULr 1 No 1 KUt i 1UN { 


i 


4445 
4446 


021360 
021 362 


001402 
0001 37 


036614 




8EQ 

JMP 


26$ 

i#FpSPUR 


•BRANCH IF YES, 

J0THC.RW1DC. by REPOR* « oPURiOUo \ 




4447 
4448 


021366 


022626 




26$ : 


CMP 


_„J1£I+il1S| > 1+ 


;FP TRAP, 

;RESEI THE ojTACK, 


I 


A A A *s 




At ft i a "i 

010^37 


A A 4 lit 

001 236 




u rt il 


K_ t $ # § l Mr 4 


J o A V C. U A * A r UK tPKUr ntrunA t ' 




4450 


021 374 


170204 






STFpS 


R4 


jGET FPS, 


i 


4451 
4452 


021 376 
021 400 


A A "1 A c 

170305 
012700 


000200 




STST 
MOV 


R5 

#200#R0 


J bET r EC , 

?SET FD MODE, J 




4453 
4454 


021404 

A /*% A « A / 

021406 


170100 
012700 


021460 




LDFPS 
MOV 


R0 

#0VFNTT, R0 


»/^rr ! 'n Tint: rjp^ttr rft 

* GET THE RESULT, 


I 


4455 


021412 


174010 








AC0, (R0) 


i 




4456 


021414 


010537 


001254 




MOV 


R5# ##$TMP1 1 






4457 


021420 


020561 


000024 




CMP 


R5 f 24CR1) 


?w/AS THE EEC ANTICIPATED? 


A 
i 


4458 


021424 


001004 






BNE 


n »t A 

27$ 


j BRANCH If NOT ANTICIPATED, < 




4459 
4460 


021 426 


010102 






MQV 


Rl # R2 


? ERROR WAS ANTICIPATED SO 


I 


A A C * 

4461 
4462 


A O 4 A "3 A 

021430 


064 /02 


A A A A ^ A 

000030 




ADD 


# iO, R2 


* KtiUKN 1U 1 ML CnnUrv Kc*rUt\Jl Ur lot i 

^CALLING ROUTINE, 


g 


4463 

AAA** 

4464 


021434 


000112 






JMP 


(R2) 


i 




4465 


021436 


005761 


000026 


27$; 


TST 


26CR1) 


; THE ERROR *AS NOT ANTICIPATED SO 




4466 














5 IT MUST BE REPORTED HERE. FIRST SEE IF EXPECTED 


4 


4467 














? OVERFLOW OR UNDER FLOW. < 




4469 


021442 


001003 






BNE 


29$ 


JBRANCH IF EXPECTING UNDERFLOW 


« 


4469 
4470 














5REP0RT TRAPPED ON OVERFLOW WITH FlVsO ' 



MAINDEC-lt-DFf PB-A 



POP 11/34 FPP DIAGNOSTIC PART 2 MACYU 27(1006) 07-FEB-77 12S06 PAGE 82 



DFFPBA.P11 



01-NQV*76 2i:0b 



T12 



UNDERSOVER FLOW, USING MULF WITH TRAPS DISABLED, TEST 



4471 021 444 104U5 

4472 021446 OOOlbl 
4473 

4474 021452 



28$; 



000036 



ERROR 
JMP 



115 
3o(Rl) 



29$; 



; REPORT TRAPPED ON UNDER FLOW WITH FIU = 



M 

1 


4475 


021452 


104116 






30$; ERROR 


116 


( 




4476 


021454 


000161 


000036 




JMP 


3 b ( R 1 ) 




A 
1 


4477 
4478 


021460 


000000 


000000 


oooooo 


ovfntt; .WORD 


0,0,0,0 


_t 

4 




4479 


021466 


000000 












- .. — 


4480 
















f 


4481 


021470 
021470 


104412 






IIIDONE; 

RSETUP 


:G0 INITIALIZE THE FPS AND STACK? AND 


" "™ M 

f 




4483 






— — ■ — — 






jSEE IF THE USER HAS EXPRESSED 




A 
% 


4484 












? THE DESIRE TO CHANGE THE SOFTWARE 


_■ 
f 




4485 












?VIRTUAL CONSOLE SWITCH REGISTER (HAS 






4486 












?THE USER WED CONTROL G? ) • 




A 

1. 


4487 














Ml 
1 




4488 


_____ — ___ 
















4489 
















M 

f 


4490 














_c: 




4491 










• •#*##»##############*##♦#####»##*#####**#*••«#*#### ##*########♦## 






4492 










;#TEST 13 


UNDERSOVER FLOW, USING MULD WITH TRAP DISABLED, TEST 




I 


4493 
4494 










; # 

,«*THIS IS A TEST OF THE OVERFLOW AND UNDERFLOW CONDITIONS THAT CAN 


€ 




4495 










j*ARRIS£ USING 


THE MULD INSTRUCTION WITH TRAPS DISABLED, A SUBROUTINE IS 




% 


4496 










?*USED TO SET 


UP THE OPERANDS, EXECUTE THE NULD INSTRUCTION AND 


_9 
i 




4497 










;#CHECK THE RESULTS, 






4498 










; * 






1 


4499 










; » 


c 




4500 


021472 


000004 






TST1 3 : SCOPE 






A 

c 


4501 
4502 










.•UNDERFLOW, EXPONENT OF RESULT*-129 


I 




4503 
4504 


021474 
021474 


104413 






JJJ1 ; 

LPERR 


;SET UP THE LOOP ON ERROR ADDRESS. 




A 
1 


4505 


021476 


004737 


022020 




JSR 


PC,##OVUNDNT 


A 
i 




4506 


021502 


020200 


000000 




1$: .WORD 


20200,0 ?AC 






4507 


021506 


127272 


000000 




• WORD 


127272,0 




c 


4508 


021512 


020000 


000000 


000000 


2$: .WORD 


20000,0,0,0 ?FSRC 


aM 

I 




4509 


021520 


000000 














4510 


021522 


000000 


000000 


oooooo 


3$: .WORD 


0,0,0,0 ?RES 




A\ 
1 


4511 
4512 


021530 

021532 


000000 
000000 


000000 




4$5 .WORD 


0,0 ;ERROR RES. 


A 

• 


A 
I 


451 3 


021536 


127272 


000000 




. WORD 


127272,0 




4514 


021542 


00O20Q 






5$; 200 


;FPS BEFORE EXECUTION. 


c 




451 5 


021544 


000204 






204 


?FPS AFTER EXECUTION, 






4516 


021546 


#V _*l A A _l tf"k 

000012 






6$; 12 


?FEC 




t 


4517 


021550 


177777 






-1 


JFLAG 


c 




4518 


021552 


104131 






7$; ERROR 


131 ;ST 331 TO 155 INTO 115 (BUT FIU) 




4519 


021554 


000401 






BR 


8$ 




c 


4520 


021556 


104132 






ERROR 


132 jST 115 (BUT FD) 


c 




4521 


021560 








8$: 








4522 
















I 


4523 










J UNDERFLOW , EXPONENT OF RESULT s -193 


c 




4524 


021560 








JJJ2 5 








4525 


021560 


104413 






LPERR 


JSET UP THE LOOP ON ERROR ADDRESS, 




1 


4526 


021562 


004737 


022020 




JSR 


PC,##OVUNDNT 


t 





**3 4 / 


U 4 1 3 OP 


l u«uu 


AAAAAA 

OwUUUv 




1 6 • 

1 5 • 




1 A O A A A 
1 U 4 U U , U 


• a r* 

r Al 








a c a 


A % 4 C 1 1 

021572 


123456 


AAAAAA 

oooooo 






km i f*\ f-fc f\ 

• WORD 


1 4 J45o, 










AC Ofi 

i54V 


A 1 tit; 


A 4 AAA A 
1 UO00 


AAAAAA 

OOOOOO 


A A A A A A 

00000" 


45 I 


»HUKU 


1 A A A A A A A 






— ■ — 




4530 


021604 


A A A A A A 

oooooo 


















1 


4531 


021606 


000000 


oooooo 


oooooo 


3$: 


.WORD 


0,0, 0,0 


JRES 


— „ — . — ... 






A C A 

4532 


021614 


AAAAAA 

Q0000U 






















A "5 1 A 1 A 
V 4 1 1 O 


A AAAA A 


AAA AAA 

Ov UO vv 




A <£ • 




A A 1 "? "i AR A A 




. . — _ — _„™ 




1 


§534 


A ^ 4 A 1 jS 

021624 


J\ A A. A /*», 

oooooo 




















AC It 


A<5 1 A*3 A 


UU3< 1 £ 






e# 1 

3? • 


3 4 1-5 












$536 


A 4 '3 A 

021630 


A A T A A 

005204 








5204 




'fro Ar 1 ILK tiAILL U 1 iun, 






f 


4537 
4538 


021632 
0216 34 


000012 

4 11111 






6$; 


12 
-1 




JFEC 




1 




4539 


021636 


104133 






7$; 


ERROR 


133 


J SETTING FIUV OR FIV BAD. 






1 


4540 


021640 


000401 








BR 


8$ 










4541 


021642 


104132 








ERROR 


132 


fST 115 CBUT FD) 








4542 


021644... 








8$S 














4543 

A C A A 

4544 










.OVERFLOW, EXPONENT OF RESULT = 


, 

' 1 40 






1. _ 


A K A c 

4545 

A C A £ 

4546 


A 1 1 AAA 
A 1 4 H A A 

021544 


4 A A A 4 i 

104414 






JJJ3S 


LPERR 






A u U K & # 


i 




4547 

i» £ A A 

**5 48 


021646 

U4 1 0-5 4 


004737 

At A *> A A 

U0U40U 


022020 

f\ A A A A 

oooooo 




1$ ! 


JSR 
.WORD 


PC,§#GVUNDNT 
60200,0 


J AC 






c 


4549 


021656 


065432 


oooooo 






.WORD 


65432,0. 






1 




4550 


All A A 1 
04 1 OD4 


A A A A A A 

060000 


A A A A A A 

oooooo 


AAAAAA 

oooooo 


2$ I 


.WORD 


60000,0,0,0 


» tr c D r» 

f r i5KL 






i 


ACR* 

4531 


A O 1 A 7 A 
V £10 / 


AAAA A A 


















^534 


A O 1 ill 
04 1 v / 4 


A A A A A A 

000000 


oooooo 


AAAAAA 

oooooo 


3$S 


.WORD 


0,0,0,0 


f Kv£> 








4553 

A C £ A 

455 4 


021700 
021 /02 


000000 

A A A A A A 

000U00 


AAAAAA 

oooooo 




4$: 


.WORD 


0,0,65432,0 


?&RROR RbS. 








4555 
4556 


021710 
021 / 1 1 


oooooo 

A A A 1 A A 

000400 






5$; 


200 




?rP5 ot-rORfc Rac.CUTION . 




1 


# 


4557 


021714 


000206 




■ 




206 




fFPS AFTER EXECUTION. 






a c e o 

455o 


021 ' 1 o 


AAAA 1 A 

000010 






6$; 


10 




• IT i. P 




i 




4559 


021720 

All 7 ^ *J 
04 1 / * 4 


oooooo 

1 A A 1 3 A 

10*1 34 






7$; 




ERROR 


134 


jFLAG 

a C T> "J ^ rpo 4 1 A tUTfi 4 4 A , £ 


5U 1 r 1 V ) 




i 


4561 
4562 


021724 

A *% 4 *7 1 A 

021 '2o 


000401 

4 A A 4 1 C 

104135 








BR 

ERROR 


8$ 
135 


JoT 116 (oUl rP) 




1 


M 
1 


4563 
45t>4 


021730 








8$: 










) 




4565 
4566 










,0VERFL0W, EXPONENT OF RESULT = 


w 4 1 A 

• 130 








45© / 
456^ 


021 '30 


104413 






JJJ4? 


LPERR 




JSET UP THE LOOP ON ERROR 


ADDRESS . 


] 


1 


ACAD 

4570 


All 7 "2 O 
0^1 #44 

0217 3b 


aa 47 'i 7 
00^* f * f 

A £ A 1 A A 

060200 


0440 40 

A A A A A A 

oooooo 




1$; 


JSR 
. WORD 


PC,£#QVUNDNT 
60200,0 


? AC 




1 




4571 


021742 


125252 


oooooo 






.WORD 


125252,0 










4572. 


021 /46 


A Al A *j A A 

060200 


A A A J"t A A 

00.0000 


A A A A A A 

Q.00000 


2s : 


. WORD 


60200.0.0,0 


m. t> c 1 n 

; FSRC 






| 


*5 / 3 


All 7 R A 
0*1 / ->4 


A A A A A A 

oouooo 
















1 




A«> 7 a 


04l (DO 


AAAAAA 

oouooo 


AAAAAA 

oooooo 


AAAAAA 
OOOOOO 


3$J 


. WORD 


0.0,0,0 


• ore 






C 


4575 


021764 


oooooo 


















4576 


021766 


oooooo 


oooooo 


125252 


4$J 


.WORD 


0,0. 125252,0 


J ERROR RES. 




1 




4577 
4578 


021774 
021776 


oooooo 

006211 






5$: 


6211 




JFPS BEFORE EXECUTION. 






c 


4579 


022000 


006206 








6206 




?FPS AFTER EXECUTION. 




i 




4580 


022002 


000010 






6$: 


10 




JFEC 







4581 022004 000000 ; FLAG 

i 4582 02 20 06 1 04136 7$J ERROR 136 ^SETTING FIUV OR FIV BAD. 
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4583 
4584 



022010 
022012 



000401 
104135 



BR 

ERROR 



4585 022014 000137 022430 



8$: 



JMP 



8$ 
135 
$#JJJDONE 



?ST 116 (BUT FD) 



;G0 TO NEXT TEST 



4587 
4588 


ETHIS SUBROUTINE, OVUNDNT, IS USED TO SET UP THE OPERANDS , EXECUTE 

, mne yiii n T M CPQ ri/or T TUI Kurt /"* U IT f* U T U C DPCIlt TC f~\ ET AW T H CTDItnT T HM ui T T U 

ElHE MULD INSTRUCTION AND CHELlS. 1HE Re.5ULj15 Ur AN I N5 1 MUX I IUN Wiln 


4589 
4590 


E OPERANDS WHICH SHOULD RESULT IN EITHER OVERFLOW OR UNDERFLOW. A CALL 
?TQ IT IS MADE THU5J 


4591 

4592 


E AGAR**; .WORP X,X,X,X SAC OPERANP 


4593 

4594 i 


E FSRCARG; . WORD X f X,X,X ?FSRC OPERAND 


4595 
4596 


E ERRES; .WORD X,X,X,X j ERROR RESULT 

f FP5B* .WURP X Jrro B&ruHfc bALLUllUN 


4597 
4598 


E FPSAS .WORD X ?FPS AFTER EXECUTION 
E rn.CS . WURP a 'tArfcLltu r c»i- 


4599 
4600 


E FLAGS .WORD X ? 0/»l , OVER /UNDER FLOW FLAG 
f ERR IS C.KHUK a JlKAr tKKUK, 


4601 
4602 


E BR C0NT 

f ERH2* EKHUH a jPAIA, KtoULi &KHUK 


4603 

4604 ! 


E C0NT: sRETURN ADDRESS 


4605 

4606 1 


ETHE OPERANDS ARE SET UP (USING AC0 AS THE ACCUMULATOR). THEN 
E THE ™UuP IN5TRUCFI0N 15 c-AECUl&U. It* WU IKAr UCvUKo JLHEN 1 tit, 


4607 

4608 i 


E RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE EPS IS 
ECOMPAREP Wi TH r P5A Ir inlS TOO 15 CURKeXi UVUwPNI KE.JURN& CON \ HUL 


4609 1 

4610 i 


ETU *HE CALLING HuUIiNE Ai CUNl. It 1 int r P5 15 BAP UVUNDNi 

EREPORTS THIS FAILURE AND THEN RETURNS TO C0NT, IF THE RESULT OF THE 


4611 

4612 i 


EMULD IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 
rANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 


4613 ; 

4614 ! 


• THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN OVUNDNT 
IWILL TRANSFER CONTROL TO THE ERROR CALL AT ERR2. OTHERWISE THE 


4615 I 

4616 1 


[RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND OVUNDNT WILL 
[REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 


4617 S 

4618 J 


•IF A TRAP OCCURS (IT SHOULD NOT) THEN OVUNDNT WILL READ THE FEC. 
ISH0ULD THE FEC HATCH THE ANTICIPATED FEC OVUNDNT WILL 


4619 1 


E STORE ALL DATA AND TRANSFER CONTROL TO THE ERROR CALL AT ERRl. IF THE 



4620 



4621 
4622 



;FEC IS NOT THE SAME AS THE ANTICIPATED F EC OVUNDNT WILL REPORT 



j THE ERROR AND RETURN TO CONT. NOTE THAT OVUNDNT USES THE FLAG 
;T0 TELL WHETHER OR NOT THESE PARTICULAR OPERANDS WILL RESULT IN 



4623 
4624 



? UNDERFLOW (FLAG=-1) OR OVERFLOW (FLAGs=0) f 



4625 
4626 



022020 
022022 



012601 
012700 



000200 



4627 
4628 



022026 170100 



4629 022030 010100 

4 630 2 203.2 172410 

4631 

4632 022034 010102 



OVUNDNT; MOV (SP)+*R1 ?GET A POINTER TO THE ARGUMENTS. 

MOV #200, R0 JSET FD MODE. 



LDFPS R0 



MOV 
LDP 

MOV 



R1,R0 
(R0),AC 

R1,R2 



; LOAD AC0, OPERAND. 



SSAVE THE DATA PATTERNS IN CASE OF 



4633 
4634 



022036 
022041, 



4635 
4636 



022046 

J02M2. 



010237 
010237 



001240 
000010 



001242 
000010 



4637 
_46JJL 



022056 
022062. 



010237 
016137 



001244 
000042. 



MOV 
ADD 
MOV 
ADD 



R2,i#$TMP3 
#10, R2 



? ERROR . 



R2,@#$TMP4 
#10, R2 



001 252 , 



MOV 
MOV 



R2,e#$TMP5 
42(Rl),e#$TMP10 





MAINOEC 


-ll*OFFPf 




POP 11/34 FPP 


DIAGNOSTIC PART 2 


MAClfll 27(1006) 


07-FEB-77 12:06 PAGE 85 


if "-' -■ 
1 


DFFPBA.PU 0! 


»N0V*76 


21 S06 




T13 


UNDER\0V£R FLOW, USING 


MULD WITH TRAP DISABLED, TEST 


1 


4639 

4640 


022070 


012737 


022420 


001246 

, _ 




MOV 


#QVDNTT,£#$TMP6 






4641 
1642 


022076 
022102 


016100 
170100 


000040 






MOV 
LDFPS 


4Q(Rl),R0 
RO 


? LOAD THE FPS, 


1 


4643 
4644 


022104 
0221 12 


012737 
012737 


022126 

022312 


001236 
000244 


— - — — - — — — 


MOV 
MOV 


#1$,@#$TMP2 
^25^#FPVEC1 _ 


; SET UP THE FP TRAP VECTOR IN CASE 


1 


4645 
4646 


0221 20 


010100 








MOV 


Rl , RO 


*OF ERROR. 

^COMPUTE THE ADDRESS OF FSRC. 




4647 
H*8 


022122 


062700 


000010 






ADD 


#10, RO 




4 

1 


4649 
4650 


022126 


171010 








MOLD 


(RO) , ACO 


jTEST INSTRUCTION, 


< 


4651 
4652 


022130 
0221 32 


1 70204 
170305 






2$: 


STFPS 
STST 


R4 
R5 


;GET FEC, 




4653 
4654 


022134 
0221 40 


01 2700 
170100 


000200 






MOV 
LDFPS 


#200, RO 

ri a. 

RO 


;S£T FD MODE, 


t 


4655 
4656 


022142 
0221 46 


012700 
174010 


022420 






MOV 
STD 


#OVDNTT,P0 
ACO, (RO) 


J GET THE RESULT, 


1 


4657 
4658 


022150 
022154 


010437 
010537 


001250 
001254 






MOV 
MOV 


R4 f ##$TMP7 
R5 , @# STMP 1 1 






4659 
4660 


022160 


012700 


022420 






MOV 


fOVDNTT, RO 


;CHECK THE RESULT. 


f 


4661 
4662 


022164 
022166 


010102 
062702 


A A A JV A A 

000020 






MOV 
API) 


R1,R2 
#20, R2 




f 


4663 
4664 


022172 
0221 76 


012703 
022022 


000004 




4$ S 


MOV 
CMP 


#4,R3 

(R0)+, (R2)+ 






4665 
4666 


022200 
022202 


001015 
077303 








SNE 
SOB 


15$ 
R3, 3$ 


jBRA^CH IF INCORRECT, 


- - 
i 


4667 
4668 


A A A ^ A it 

022204 


026104 


000042 




_ 


CMP 


42(R1),R4 


?WAS FPS CORRECT? 


1 


4669 
4670 


022210 


001002 








8NE 


10$ 


jBRANCH IF FPS IS INCORRECT, 




4671 
4672 


022212 

— : — — , 


000161 


000056 




4$ : 


JMP 


56CR1) 


JRETURN, TEST COMPLETED, 


€ 


4673 
4674 


022216 


005761 


000046 




j REPORT 
10$ : 


INCORRECT FPS, 
TST 46(R1) 


;WAS THE RESULT OVER OR UNDER FLOW? 


1 


4675 
4676 


022222 


001002 


— — — 






BNE 


12$ 


jBRANCH Ip UNDERFLOW , 




4677 
4678 


a a a ^t* m jft 

022224 


104123 






11$; 


ERROR 


123 


? REPORT FPS BAD AFTER OVERFLOW, 


1 


4679 
4680 


022226 


000771 








BR 


4$ 




« 


4681 
4682 


022230 
022230 


104124 






12$: 
1 3$; 


ERROR 


124 


?REPORT FPS BAD AFTER UNDERFLOW, 




4683 
4684 


022232 


000767 








BR 


4$ 




i 


4685 
4686 


■ ■ 

02223 4 


Ql2. 7 iL0 „ 






; RESULT 


INCORRECT, 

MOV #OVDNTT,R0 


;SEE IF FAILURE IS ANTICIPATED 


i 


4687 
4688 


022240 
022242 


010102 
062702 


000030 






MOV 
ADD 


R1,R2 
#30. R2 


; FAILURE, 




4689 
4690 


022246 
022252 


012703 
022022 


000004 




16$ : 


MOV 
CMP 


#4, R3 

(R0)+, (R2)+ 




1 


4691 
469? 


022254 
022256 


001007 
077303 








6NE 
SOB 


17$ 


; BRANCH IF NOT ANTICIPATED. 


1 


4693 
4694 


022260 


010102 








MOV 


Rl ,R2 


J ERROR WAS ANTICIPATED SO RETURN 
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4695 


022262 


062702 


A A A A (f 4 

000054 




ADD 


#54f R2 


• t> n Tar et d d n d otronDT t m t u tir rAi r i »ir 


4696 


022266 


010237 


001 236 




NOV 


R2 1 p # $THP2 


* HUU 1 I NL 9 


4697 


A A A A *1 *N 

022272 


A A A. 4 4 A 

0001 1 2 






JHP 


( R2 ) 




4698 
















4699 
4700 


022274 


005761 


000046 


17$ J 


TST 


"~46(RtT ~" 


5 RESULT WAS NOT ANTICIPATED 

JSO ERROR MUST dE HEPUR1ED HERE* 


4701 




— — — 








— 




4702 










- - - ' 


— — - - - - 


. n » lit ore [it fpn t m n\;c"Dri Ay no niuncD 
JHAVE HEoULlED IN UVEKrLO" U1K UNUC.K 


4703 














SFL0W B¥ LOOKING AT THE FLAG* 


4704 


022300 


001002 






BNE 


19$ 


> o k it r< u Tsr i ih n d r f ^1 U2 it V n i?p Tti n 

JBHANC" Ar UwUERrLUW EArEt-lED, 


4705 
4706 














?REP0RT RESULT INCORRECT, EXPECTING 


4707 


022302 


104125 


■— — — — ~— — _— — 


18$: 


ERROR 


125 


^OVERFLOW, 


4708 


022304 


000742 






BR 


4$ 




4709 
4710 


022306 






4 A A ^ 

19$ : 






JREPORT RESULT INCORRECI, fe-ArELlING 


471 i 


022306 


104126 




20$: 


ERROR 


126 


J UNDERFLOW . 


4712 


022310 


000740 






BR 


4$ 




471 3 
4714 








* T C* ft lit 

? If AN 


FP TRAP 


OCCURS COME HERE, 


: , _ _ _ , _ , : _ ; 


A ■** 4 er 

4715 
4716 


022312 
02231 4 


a 4 t tm 
01 1602 

A ^ 1 ft '"I 

022 702 


022130 


25$ : 


MOV 

<"> 4* u 

CMr 




i w a c twit to ko mm 1 Mr* thjt miit p Tw^TonrTinw? 


A H 4 *9 

4717 
4718 


022320 
022322 


A A 4 iftl 

001402 

A A A 4 "3 "7 

0001 J / 


36614 




CCA 

8EU 
JMP 


1 li. * 

«?ff f P5PUR 


JbH-ANv,." Ar It^t 

• nTUITDU T CE* m DETDflDT & CDfID T HII C 

7 U I fiCtK n A ab vsLJ KtrUKl A pPUK xUUo 


4719 














?FP TRAP • 


4720 


022326 


022626 




26$ : 


»* n 

CMP 


(SP)+ f (5P) f 


fHEo&l Ant, pIAv»,I\ t 


A ** *% 4 

4721 


0223 30 


01023/ 


A A 4 <i It 

001236 




wu v 






4722 


022334 


170204 






STFPS 


R4 


•GET EPS • 


4723 


0223 36 


4 '•J A 3 A C 

170305 






CDC T 

5T5T 


R5 


J VaE A P • 


4724 


022340 


012700 


000200 


— — — — — 


kM t\ If 

W V 


#200, R0 


• CP 'TP £7* uf r*i r\ c* 

JoEl rl) MUDL, 


4725 
4726 


022344 
022346 


170100 
012700 


a a a * a a 

022420 




LDFPS 
*4QV 


R0 

lOVDNTT r R0 


JGET THE RESULT, 


4727 


022352 


174010 






o «p r\ 


ACOf (R0) 




4728 


022354 


010537 


001254 




kM f*\\ f 

MOV 


R5 f g#$TMPl 1 




A "1 O »*« 

"7*9 


y / 4 JDU 




A AAA A A 




V, nr 






4730 


022364 


A a 1 A A 4 

001004 






i"a 4-1 


27$ 


JBRANCH IF NOT ANTICIPATED. 


473 J 
4732 


022366 


010102 






MOV 


Rl 1 R2 


?ERR0R WAS ANTICIPATED SO 


4733 


022370 


062702 


000050 




ADD 


#50#R2 


m DT1II1DM T O TUT CUDHD D C D rl D T CltP fUP 

J RE I URN AU Inc. fcKRUR RErOHi Ur AML 


4734 














jCALLING ROUTINE. 


4735 


022374 


000112 






JMP 


(R2) 




4736 
















4737 


022376 


00576 i 


000026 


1 T A • 

27$ ; 


TST 


2 1? t R I J 


"THE ERROR WAS NO 1 AN 1 AC APA 1 tU oU 


4738 














; IT MUST BE REPORTED HERE. FIRST SEE IF EXPECTED 


4739 















;0VERFL0W OR UNDER FLOW, 


474o 


022402 


001003 






BNE 


29$ 


jBPANCH IE EXPECTING UNDERFLOW 


4741 
4742 








,. — s 






? REPORT TRAPPED ON OVERr LOW WITH r I ¥ = 


4743 


022404 


104127 




28$ : 


ERROR 


127 




4744 


022406 


AAA* jL 4 

000161 


A A A A C £ 

000056 




Tun 


5 6 ( R 1 ) 




4745 
4746 


022412 






29$: 






? REPORT TRAPPED ON UNDER t LOW WITH FIU*0 


4747 


022412 


104130 




30$: 


ERROR 


130 




4748 


022414 


000161 


0QP056 




JMP 


56CR1) 




4749 
4750 


022420 


0QP00O 


000000 000000 


OVDNTT: 


.WORD 


0,0,0,0 







MAINDEC 


-ll-DFFPB-A 


POP 11/34 


FPP DIAGNOSTIC PART 2 MACm 27(1006) Q7-FEB-77 12:06 PAGE 87 






i 


ill 


DFFPBA.P1 1 01 


-N0V-76 


21 506 


T13 UNDER\OVER FLOW, USING MULD WITH TRAP DISABLED, TEST 






; r~ 

i 


f 


4751 
4752 


022426 


000000 










1 




4753 
4754 


022430 
022430 


104412 




JJJDONE: 

RSETUP jGO INITIALIZE THE FPS AND STACK? AND 








1 


4755 
4756 








JSEE IF THE USER HAS EXPRESSED 

j THE DESIRE TO CHANGE THE SOFTWARE 






( 


1 


4757 
4758 








j VIRTUAL CONSOLE SWITCH REGISTER (HAS 
j THE USER TYPED CONTROL G?) , 






f 


4759 
4760 


I 


4761 
4762 




— — ■ 










< 


I 


4763 
4764 








♦ • ###### #######*########*«(-###### *##########«■##### ##*###### **#*##* 
;*TEST 14 UNDERNOVER FLOW, USING MULF WITH TRAPS ENABLED, TEST 






1 




4765 
4766 









• * 

J#THIS IS A TEST OF THE UNDERFLOW AND OVERFLOW 








i 


4767 
4768 








?#CONDITIONS THAT CAN OCCUR USING THE MULF INSTRUCTION . 
;#A SUBROUTINE IS CALLED TO SET UP THE OPERANDS, 






< 


1 


4769 
4770 








\ # EXECUTE THE HULF INSTRUCTION AND CHECK 

I #THE RESULTS. HERE THE PARTICULAR INTERRUPT, 






( 




4771 
4772 








NEITHER OVERFLOW OR UNDERFLOW, IS ENABLED SO A TRAP SHOULD 
;*QCCUR. 








1 


4771 
4774 








? * 

• •##############*#######«############**#######*#**###*#*#*######* 






€ 


1 


4775 
4776 


022432 


000004 




TST14: SCOPE 






t 




4777 
4778 


022434 






; UNDERFLOW, EXPONENT OF RESULT * -129 
KKK15 








1 


4779 
4780 


022434 
022436 


104413 
004737 


P??66p 


LPERR 5 SET UP THE LOOP ON ERROR ADDRESS, 
JSR PC,$#OVUNFT 






c 


f , 


4781 
4782 


022442 
022446 


020123 
020200 


045676 
000000 


1$; .WORD 20123,45676 jAC 
2$: .WORD 20200,0 sFSRC 






1 




4783 
4784 


022452 
022456 


000123 
177777 


045676 
177777 


3$: .WORD 123,45676 ?RES 

4$: .WORD -1,-1 " ERROR RES. 








1 


4785 
4786 


022462 
022464 


002000 
102004 




5$ S 2000 • FPS BEFORE EXECUTION . 

102004 JFPS AFTER EXECUTION. 






4 


4 


4787 
4788 


022466 
022470 


000012 
177777 




6$: 12 JFEC 
-I ? FLAG 






• 




4789 
4790 


022472 
022474 


104145 
QM40* 




7$5 ERROR 145 ?ST 331 (BUT FIU) NO TRAP. 
BR 8$ 








I 


4791 
479? 


022476 
022500 


104144 




ERROR 144 

8SJ 






< 


f 


4793 
4794 








; UNDERFLOW, EXPONENT OF THE RESULT = -193 










4795 
4796 


022500 
022500 


104413 




KKK3 S 

LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 








€ 


4797 
*798 


022502 
022506 


004737 
P 10,1 27 


022660 
127272 


JSR PC,e#GVUNFT 
ISs • WORD 10127,127272 ;AC 






< 


i 


4799 
4 8 GO 


022512 
022516 


010200 
060127 


000000 
127272 


2$: .WORD 10200,0 ?FSRC 
3S; .WORD 60127,127272 ?RES 






< 




4801 
4802 


022522 
022526 


177777 
007017 


177777 


4$: .WORD -1,-1 fERROR RES. 

5$: 7017 jFPS BEFORE EXECUTION. 








C 


4803 
4804 


022530 
022532 


107000 
000012 




107000 ?FPS AFTER EXECUTION. 
6s: 12 ;FEC 






4 


€ 


4805 
4806 


022534 
022536 


177777 
104146 




-1 

7$; error i 46 ;st 137 (but fiu) no trap. 






1 
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1 
4 


4808 


A O 7 Si A A 

022542 


A A A A A 1 

104144 






BR 

ERROR 


8$ 
144 




. — 








U45 23 4* 




— ■ — 


8$; 














4810 




















c 


4811 








JOVERFLQW, EXPONENT OF THE RESULT = 128 




t 




4812 


022544 






KKK45 














4813 


022544 


104413 






LPERR 




;SET UP THE LOOP ON ERROR 


ADDRESS. 


i 
1 


1 

1 


A iJ 4 A 

4814 


a 1 n ft. a a 
022546 


t\ A A *1 U *7 
V * ' i ' 


02*600 




JSR 


PC , (pfQVUNrT 


- - 








(i *> 9 




* «r <rf £t J> 


1$ 5 


.WORD 


60252, 1 25252 


? AC 










A O 7 Si Si *v 


At A AAA 

UO V vU v 


A A A A A A 
V# V V V V V 


o * • 




60000,0 


t F SRC 






< 


4817 
4818 


022562 
ft 1 ^ & ^ k 


000052 
llllli 


125252 

\ 77777 
\ 1 1 1 1 1 


3$S 
4$: 


.WORD 
.WORD 


000052,125252 
* I , * 1 


? RES 

fERROR RES. 




c 


i 

i 


ttf i y 
4820 


v « < J 

A "2 1 «S "J A 


A A 1 ft AA 
i A 1 AAA 




5$5 


1000 
101006 




jFPS BEFORE EXECUTION. 
?FPS AFTER EXECUTION, 




- — - — - — — - — ■ 

1 




4821 


022576 


000010 




6$; 


10 




? FEC 








4822 


022000 


A A A ft A A 

000000 











?FLAG 






1 


4823 

j (in * 

48/4 


022602 
022004 


104147 

A A A A A 1 
000^01 




7$: 


ERROR 
SR 


147 

8$ 


jST 333 (BUT FIV) NO TRAP 




c 




4825 


022606 


104143 






ERROR 


143 








i, 


4o4c6 


A 7 7 £. * A 






8$; 










t. 




4827 








?0VERFL0W # EXPONENT OF RESULT 


= 130 






i 


4829 
4830 


022610 

A77ls 1 A 


1 ft A. a « i 




KKK55 


LPERR 




;SET UP THE LOOP ON ERROR 


ADDRESS- 

r% %J 9T\ w lh# *Jf *p 


c 


1 


A 1 4 

A a ^ ^ 


A 7 *> 1 *3 


a a d 7 'a 7 

A t. A 1 A "i 


Mo /6D*t 


1$? 


JSR 
.WORD 


PC,##0VUNFT 
60345,67654 


5 AC 




£ 




4833 

A "!t A 


022622 

A O O A O £ 


060200 

A A A 1 A Si 


000000 

Af.7t.c4 


2$: 
3$: 


.WORD 
.WORD 


60200,0 
345,67654 


*r SRC 
JRES 






c 


4835 

IS jo 


022632 

U <£ * w 4» O 


177777 

A A7 a 1 c 


177777 


4$: 

5$5 


. WORD 
7015 


• 1 , ~1 


; ERROR RES. 
EPS BEFORE EXECUTION, 




4 




4837 


022640 


107002 






107002 




?FPS AFTER EXECUTION. 








4$ 3ft 

"t v ^ 5 


05 26 45 


VVVwtv 




6$: 


10 




;FEC 








4839 
4840 


022644 
022646 


000000 
104150 




7$; 




ERROR 


150 


?FLAG 

?ST 133 (BUT FIV) NO TRAP 






c 


4841 
4842 


022650 
022652 


000401 
104143 






BR 

ERROR 


8$ 
143 






c 


c 


4843 
4844 


022654 


000167 


000412 


8$: 


JMP 


KKKDONE 






c 





4845 J 


'THIS SUBROUTINE, 0VUNFT, IS USED TO SET UP 


THE OPERANDS, EXECUTE 






4846 ! 


» THE MULF INSTRUCTION AND CHECK 


THE RESULTS 


OF AN INSTRUCTION WITH 




i 


4847 J 


•OPERANDS WHICH SHOULD RESULT IN 


EITHER OVERFLOW OR UNDERFLOW. A CALL 






4848 i 


•TO IT IS MADE THUS: 






c 


4849 5 

4850 3 


ACARG; . WORD 


X,X 


;AC OPERAND 


^ 




4851 J 


FSRCARG; .WORD 


X,X 


?FSRC OPERAND 






4852 3 


RES; f WORD 


X,X 


J EXPECTED RESULT 




c 


4853 3 


ERRES: .WORD 


X,X 


? ERROR RESULT 


i 




4954 ; 


! FPSB: . WORD 


X 


?FPS BEFORE EXECUTION 






4855 J 


FPSA: .WORD 


X 


;FPS AFTER EXECUTION 




i 


4856 3 


FEC ! . WORD 


X 


JEXPECTED FEC 


t 




4857 ! 


; FLAG: .WORD 


X 


?0/-1»OVER/UNDER FLOW FLAG 






4858 i 


ERR 1 5 ERROR 


X 


j TRAP ERROR, 




f 


4859 J 

4860 ! 


BR C0NT 
r ERR 2 5 ERROR 


X 


; DATA, RESULT ERROR 


c 




4861 3 


; CONT: 




jRETURN ADDRESS 




1 


486? 








< 



MAINPE011~PPFPB»A 
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4863 

4864 




;THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR) , THEN 
;THE NULF INSTRUCTION IS EXECUTED , IF THE TRAP OCCURS THEN THE 


4865 
4866 




jRESULT IS CHECKED AGAINST RES, IF THE RESULT IS CORRECT THEN THE FPS IS 
rCOMPARED WITH F PSA If THIS TOO IS CORRECT OVUNFT RETURNS CONTROL 


4867 
4868 




;T0 THE CALLING ROUTINE AT CONT, IF THE FPS IS BAD OVUNFT 
jREPORTS THIS FAILURE AND THEN RETURNS TO CQN1. THE FEC IS TREAJ.E.D 


4869 
4870 




;IN THE SANE WAY. IF THE RESULT OF THE 

sMULF IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 


4871 
4872 


" — " — 


? ANTICIPATED FAILING DATA PATTERN, ERRES, IF THE FAILURE IN 
; THE RESULT WAS ANTICIPATED CQRRECTLi TO bL bRRfc.5 TnbN OVUNFI 


4873 
4874 




?WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR2 . OTHERWISE THE 
SRESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND OVUNr I wluh 


4875 
4876 


— _____ 


5 IF NO TRAP OCCURS CONTROL IS PASSED TO ERRl. 


487? 
4878 




J NOTE THAT QVUNFNT USES THE FLAG 

jTO TELL WHETHER OR NOT THESE PARTICULAR OPERANDS WILL RESULT IN 


4879 




; UNDERFLOW (FLAGs-1) OR OVERFLOW (FLAG«0) . 



c 



g 


4881 
4882 


022660 
022662 


012601 
012700 


000200 




OVUNFT 5 


MOV 
MOV 


(SP)+,R1 
#200,R0 


5GET A POINTER TO THE ARGUMENTS, 

m c c*< n cr\ ut"iT\c 
JSfcl ru MUOfc,, 


1.. 




4883 
4884 


022666 


170100 








LDFPS 


P0 






i 


4885 

4886 


022670 
022672 


010100 
172410 








NOV 
LDD 


R1,R0 

( R0 ) , ACO 


f LOAD ACO, OPERAND, 


I 


g 

i. 


4887 
4888 


022674 


010102 








NOV 


R 1 , R2 


; SA V& ItltL UA1A PAA IbRNo IN tflis& Ur 


g 




4889 
4890 


022676 
022702 


010237 
062702 


001240 
000004 






NOV 

ft r\ T\ 

ADD 


R2,£#$TMP3 
i 4 , R2 


j ERROR , 




t 


4891 
4892 


022706 
022712 


010237 
062702 


001242 
000004 






MOV 

ft r% f\ 

ADD 


R2,§#$TMP4 
#4,R2 




c 


g 
1 


4893 


022716 
022 '22 


010237 


001244 

AAA A^^ 

000022 


001 254 




MOV 
WU V 


R2,i#$TMP5 

1 1 ^ D 4 \ k t TUD 1 A 




i 

f 




4895 
4896 


022730 


012737 


023262 


001246 




MOV 


#0VFTT,@#$TMP6 






1 


4897 
4898 


022736 
022742 


016100 
170100 


000020 






MOV 
LDFPS 


20CR1),R0 
R0 


•LOAD THE FPS, 


t 


4 


4899 
4900 


022744 
022752 


012737 
012737 


022766 
022776 


001236 
000244 




MOV 
MOV 


#l$ # P#$TMP2 
#50$,$#FPVECT 


jSET UP THE FP TRAP VECTOR IN CASE 


1 




4901 
4902 


022760 


010100 








MOV 


R1,R0 


JOF ERROR, 

JC0MPUTE THE ADDRESS OF FSRC, 




1 


4903 
4904 


022762 


062700 


000004 






ADD 


#4 # R0 




4 


€ 


4905 
4906 


022766 
022770 


171010 
170000 






1$! 

2$: 


MULE 
CFCC 


(R0),AC0 


J TEST INSTRUCTION, SHOULD CAUSE TRAP, 


i 




4907 
4908 


022772 


000137 


023222 






JMP 


##25$ 


? FAILURE, NO TRAP. 




< 


4909 
4910 


022776 


011602 






50$ J 


MOV 


(5P),R2 


;TRAP TO HERE AnD SEE IF THE PC OF THE 






4911 
4912 


023000 
023004 


020227 
001402 


022770 






CMP 
6E0 


P2,#2$ 
51$ 


; TRAP WAS THAT OF THE MULF INSTRUCTION, 
j BRANCH IF YES, 


€ 




4913 
4914 


023006 


000137 


036614 






JMP 


iMFPSPUR 


; OTHERWISE REPORT SPURIOUS FP ERROR. 




« 


4915 
4916 


023012 
0?3Q14_ 


022626 
170204 






51$; 


CMP 
STFPS 


(SP)+, (SP)+ 
R4 


; RESET THE STACK 
jGET FPS. 


C 


4 


4917 
4918 


023016 
023020 


170305 
012700 


00020Q 






STST 
MOV 


R5 

#200, R0 


? GET FEC, 

?SET FD MODE. 


< 
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T14 



UNDER\OVER FLOW, USING MULF WITH TRAPS ENABLED, TEST 







A 1 'a A 1 4. 

02 30 I % 


1 TA1 A A 




wUr rfi> 


t) ft 






g 


4920 


02 3026 


A 4 11 Aft 


r\ <i ■a o £ i 
'•J £ 3 £V 4 


MOV 


f OVr TT, RO 




c 




*9 2 1 


A 1 O A "J 1 


1 / *U 1 U 




Olli 










***2 




A 1 A 4 "a 7 


U V 1 £ J V 










t 


4923 
4924 


023040 


010537 


001254 


MOV 


R5,§#$TMP1 1 




( 




4925 


023044 


012700 


023262 


MOV 


#QVFTT»R0 


;CHECK THE RESULT, 




c 


4926 


023050 


010102 




MOV 


R1,R2 




4 




4927 


023052 


062702 


000010 


ADD 


#10, R2 








4928 


023056 


012703 


000002 


MOV 


#2,R3 







4929 023062 022022 

4930 0230 64 001 027 



3$5 



4931 
4932. 



023066 077303 



CMP 
BNE 
SOB 



(RG)+, CR2J + 
15$ 



; BRANCH IF INCORRECT. 



R3,3$ 



4933 023070 026104 

4934 023074 Q01014 



000022 



CMP 
BNE 



22(R1),R4 
10$ 



?WAS FPS CORRECT? 
? BRANCH IF FPS IS INCORRECT. 



4935 
4936 


023076 


026105 


000024 




CMP 


24(R1),R5 


jIS FEC CORRECT? 


1 


4937 


023102 


001002 






BNE 


5$ 


fIF INCORRECT BRANCH, 




4938 


023104 


000161 


J*i jh. A #V ^ £f 

000036 


% V # 


JNP 


36(R1) 


JRETURN, iEST COMPLETED. 


fl 


493* 

4940 








jREPORT 


INCORRECT FEC • 






4941 


023110 


005761 


000026 


5$: 


TST 


26(R1) 


;WAS THE RESULT OVERFLOW OR UNDERFLOW? 


f 


4942 


0231 1 4 


001002 






BNE 


7$ 


|t)KAnC" if UNUbKrLUw, 




4943 
4944 














f REPORT BAD r EC ON EXPECTED OVERfLOw. 


■ 


4945 


023116 


104137 




6$: 


ERROR 


137 






4946 


0231 20 


000771 







BR 


4$ 






4947 


A 1 "3 * 11 






/SI 






« DC DHDT ft h H fiTSTP flki IT Y D trPT C* H fl .\i H S'O V I fl'ml 

* KLrUK i ohU rbw UN E»Ar &V» 1 C*L» UNULKr LUn . 


t 


4949 


023122 


104140 




3$: 


ERROR 


140 






4950 


023124 


000767 






BR 


4$ 




f 


4951 
4952 








J REPORT 


INCORRECT FPS. 






4953 


023126 


005761 


000026 


10$: 


TST 


26CR1) 


jWAS THE RESULT OVER OR UNDER FLOW? 


f 


4954 


023132 


001Q02 






BNE 


12$ 


j BRANCH IF UNDERFLOW. 




4955 
4956 














j REPORT FPS BAD AFTER OVERFLOW. 




4957 


023134 


104141 




11$; 


ERROR 


141 






4958 


023136 


000762 






BR 


4$ 






4959 
4960 


023140 






12$* 






; REPORT FPS BAD AFTER UNDERFLOW. 




4961 


023140 


104142 




13$; 


ERROR 


142 






4962 


0231 42 


000760 






BR 


4$ 






4963 
4964 








; RESULT 


INCORRECT. 






4965 


023144 


012700 


023262 


15$; 


MOV 


#OVFTT,R0 


?SE£ IF FAILURE IS ANTICIPATED 


1 


4966 


023150 


010102 






MOV 


R1,R2 


j FAILURE . 




4967 
4968 


023152 
023156 


062702 
012703 


000014 
000002 




ADD 
MOV 


#14, R2 
1 2 , R 3 




i 


4969 


023162 


022022 




16$; 


CMP 


CRG)+, (R2)+ 






4970 


023164 


001007 






BNE 


17$ 


; BRANCH IF NOT ANTICIPATED. 





4971 



023166 077303 



SOB 



R3 # 16$ 



4973 
4974 



023170 
023172 



010102 
062702 



000034 



MQV 
ADD 



R 1 » R2 
134, R2 



; ERROR WAS ANTICIPATED SO RETURN 
?T0 THE ERROR REPORT IN THE CALLING 



< 



I 



f 





MAINDEC 


-U-DFf Pfi 


-A PDP 11/34 FPP DIAGNOSTIC PART 2 


MACU1 27(1006) 


07-FEB-77 12:06 PAGE 91 




_ — 

iL 


DFFPBA.Pl 1 01 


-NOV-76 21:06 


T14 


UNDERVOVER FLOW , USING NULF WITH TRAPS ENABLED* TEST 


1. 


1 


4975 
4976 


023176 
023202 


010237 001236 
000112 




MOV 
*JMP 


R2,§#$TMP2 
(R2) 


^ROUTINE, 


< 




4977 
4978 


023204 


005761 000026 


17$ : 


TST 


26CR1 ) 


JRESULT WAS NOT ANTICIPATED 




1 


4979 
4980 










. — . 


;S0 ERROR HUST BE REPORTED HERE, 
; FIRSI SEE IF ARGUMENTS SHOULD 


_f L 

< 


1 


4981 
4982 


- — — 


— — — — - 


— — _____ — . _ — _ 






; HAVE RESULTED IN OVERFLOW OR UNDER 
jFLOW BY LOOKING AT THE FLAG, 


< 




4983 
4984 


023210 


001002 




BNE 


19$ 


? BRANCH IF UNDERFLOW EXPECTED, 




i 


4985 
4986 




023212 


— _ — — _ 

104143 


18$? 


ERROR 


. 

1 4 3 


; REPORT RESULT INCORRECT, EXPECTING 
^OVERFLOW, 


i 


i 


4987 
4988 


023214 


000733 




BR 


4$ 




t 




4989 
4990 


023216 
023216 


_ — , 

104144 


19$: 
20$; 


ERROR 


t 44 


? REPORT RESULT INCORRECT, EXPECTING 
;UND£RFLOW, 




At 


4991 
4992 


023220 


000731 




BR 


4$ 




At 

i 


1 


4993 
4994 


023222 


170204 


tlF NO 

25$: 


FP TRAP 
STFPS 


OCCURS COME HERE, 
R4 


j GET FPS, 


€ 




4995 
4996 


023224 
023226 


170305 

012700 000200 




STST 
MOV 


R5 

#200, RO 


;G£T FEC, 
?SET FD MODE . 




At' 

f 


4997 
4998 


023232 
023234 


170100 

012700 023262 




LDFPS 
NOV 


RO 

♦OVFTT, RO 


?GET THE RESULT. 


'_i' 

f 


c 


4999 
5000 


023240 
023242 


174010 

010437 001250 




STD 
MOV 


AC0,(R0) 
R4, §#$TMP7 




< 




5001 
5002 


023246 
023252 


010537 001254 
010102 




MOV 
MOV 


R5, £#$TMP11 
Rl ,R2 


j ERROR WAS ANTICIPATED SO 




Att 

c 


5003 
5004 


023254 


062702 000030 




ADD 


#30, R2 


? RETURN TO THE ERROR REPORT OF THE 
fCALLING ROUTINE. 


< 


€ 


5005 
5006 


023260 


000112 




JHP 


(R2) 




4 




5007 
5DCI8 


023262 
023270 


000000 000000 
000000 


oooooo ovftt: 


• WORD 


0,0,0,0 






_K 

c 


5009 
5010 


023272 




KKKDONB: 


: . . _ : 




At 

I 


< 


5011 
5012 


023272 


104412 




RSETUP 




?G0 INITIALIZE THE FPS AND STACK I AND 
:SEE IF THE USER HAS EXPRESSED 


i 




5013 
5014 




• 








rTHE DESIRE TO CHANGE THE SOFTWARE 

: VIRTUAL CONSOLE SWITCH REGISTER (HAS 




t 


5015 
5016 












jTHE USER TYPED CONTROL G? ) • 


4 


€ 


5017 
5018 














« 




5019 
5020 










i 


5021 
5022 




; 


S*TEST 
* * 


15 


UNDER\OVER FLOW, 


USING MULD WITH TRAPS ENABLED, TEST 


i 


i 


5023 

C O A 

5024 






J*THIS 
J*MULD 


IS A TEST OF THE OVER FLOW AND UNDER FLOW CONDITIONS USING THE 
INSTRUCTION WITH TRAPS ENABLED . A SUBROUTINE IS USED TO SET UP 


f 




5025 
5026 






?#THE 
j # 


OPERANDS, 


EXECUTE THE MULD 


INSTRUCTION AND CHECK THE RESULTS. 




£ 
1 


5027 
5028 


023274 


000004 


• • ##*#»#**#♦#*♦*#♦♦###♦###**♦#**########♦##**##♦###*########**### 

TST 1 5 i SCOPE 


1 


4 


5029 
5030 






J UNDERFLOW, EXPONENT OF RESULT s 


-129 


i 



M A I N DE C - 1 1 - U F F P B * A - 

DFFPBA,P11 Oi-NOV-76 21806 



5031 
5Q3? 



5033 
5034 



023276 
023276 
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218 06" T15 UNDERCOVER FLOW , USING HOLD" WITH TRAPS ENABLED* TEST 



023300 
023304 



104413 
004737 



LLL1 8 



023622 
125252 



LPERR 



Q20052 , 

5035 023310 125252 125252 

5036 023314 020300 OOOQOQ 000000 2S8 

5037 023322 000000 



JSR ' PCt MOVUNOT 
.WORD 20052, 125 25 2_ 
1 25252, 125252 



| SET UP THE LOOP ON ERROR ADDRESS. 



AC 



, WORD 

gjjOPP 



20300,0,0,0 8FSRC 



5038 


023324 


000177 


177777 


177777 


3$; 


.WORD 


177,-1,-1,-1 


?RES 


5039 
5040 


023332 
023334 


177777 
0001 77 


177777 




4s : 


♦ WORD 


177, -i 


? ERROR RES, 


5041 
5Q42 


0233 40 
023344 


125252 
002200 


125252 




5$; 


. WORD 
2200 


125252, 125252 


JFPS BEFORE EXECUTION. 


5043 


023346 


102204 








102204 




8FPS AFTER EXECUTION. 


5044 


023350 


000012 






6$8 


12 




?FEC 


5045 
5046 


023352 
023354 


177777 
104157 






7$; 


-1 

ERROR 


157 


1 FLAG 

jST 331 (BUT FIU) NO TRAP. 


5047 
5048 


023356 
023360 


000401 
104160 








BR 

ERROR 


8$ 
160 


;ST 155 (BUT FD) 


5049 


023362 








8$: 








5050 


















5051 










J UNDERFLOW, EXPONENT OF THE RESULT « -193 


5052 


023362 








LLL2S 








5053 


023362 


104413 








LPERR 




?SET UP THE LOOP ON ERROR ADDRESS, 


5054 


023364 


004737 


023622 






JSR 


PC,S#QVUNDT 




5055 


023370 


010327 


127272 




1$; 


.WORD 


10327, 127272 


8 AC 


5056 


023374 


036363 


045454 






.WORD 


36363, 45454 




5057 


023400 


010000 


000000 


oooooo 


2$: 


.WORD 


10000,0,0,0 


?FSRC 


5058 


023406 


000000 














5059 


023410 


060127 


127272 




3 $ * 


.WORD 


60127, 127272 


J RES 


5060 


023414 


036363 


045454 






.WORD 


36363,45454 




5061 


023420 


177777 


177777 


mm 


4$8 


.WORD 


-1,-1,-1,-1 


; ERROR RES. 


5062 


023426 


177777 














5063 


023430 


007217 






5 $ 8 


7217 




?FPS BEFORE EXECUTION. 


5064 


023432 


107200 








107200 




JFPS AFTER EXECUTION. 


5065 
5066 


023434 
023436 


000012 

mm 






6$8 


12 
-1 




8 FEC 
8 FLAG 


5067 


023440 


104161 






7$S 


ERROR 


161 


?ST 137 (BUT FIU) NO TRAP, 


5068 


023442 


000401 








8R 


8$ 




5069 


023444 


104156 








ERROR 


156 




5070 


023446 








8$8 








5071 
5072 










8QVERFL0W, EXPONENT OF THE RESULT s 128 


5073 
5074 


023446 
023446 


104413 






LLL3 8 


LPERR 




8 SET UP THE LOOP ON ERROR ADDRESS. 


5075 
5076 


023450 
023454 


004737 
060252 


023622 
125252 




1$8 


JSR 
.WORD 


PC,£#0VUNDT 
60252, 125252 


* AC 


5077 


023460 


125252 


125252 






.WORD 


125252, 125252 


8 FSRC 


5078 


023464 


160100 


000000 


oooooo 


2$ 8 


.WORD 


100100,0,0,0 


8FSRC 


5079 
5080 


023472 
023474 


000000 
100177 


mm 


mm 


3$ : 


. WORD 


100177,-1 ,-1,-1 


8 RES 


5081 
5082 


023502 
023504 


mm 

100177 


177777 




4$ 8 


.WORD 


100177,-1 


8ERROR RES, 


5083 


023510 


125252 


125252 






.WORD 


125252,125252 




5084 


0235J4 








5$8 


1200 




8 FPS BEFORE EXECUTION. 


5085 


023516 


101216 








101216 




8 FPS AFTER EXECUTION. 


5086 


023520 


000010 






6$ 8 


10 




8FEC 



c 



t 



i 





MAINDEC 


*11»DFFPE 


i»A 


POP 11/34 FPP DIAGNOSTIC PART 2 


MACUl 27(1006) 
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i ' 

il- 


DFFP8A.Pl 1 01 


*»NOV»76 


21:06 


T15 UNDERVOVER FLOW, USING 


MULD WITH TRAPS ENABLED, TEST 




1 


5087 

5088 


023522 
023524 


000000 
104162 






7$; ERROR 


162 


?FLAG 

;ST 333 (BUT FI¥) NO TRAP. 


1 




5089 
5090 


023526 
023530 


000401 
104163 




BR 

ERROR 


8$ 
163 


? ST 700 (BUT FD). 




1! 

1. 


5091 
5092 


023532 






8$; 






f 


« 


5093 
5094 


023532 






JOVERFLQW, EXPONENT OF THE RESULT = 130 
LLL4 ! 


1 




5095 
5096 


023532 
023534 


104413 
004737 


023622 


LPERR 
JSR 


PC, @#QVUNDT 


jSET UP THE LOOP ON ERROR ADDRESS, 




1. 


5097 
5098 


023540 
023544 


060345 
056765 


067654 
045676 


t$: .WORD 
.WORD 


60345,67654 
56765, 45676 


* AC 


t 




5099 
51(10 


023550 
023556 


060200 
000000 


000000 


000000 2$ 5 .WORD 


60200,0,0,0 


;FSRC 


1 




5101 
5 J 02 


023560 
023564 


000345 
056765 


067654 
045676 


3$S .WORD 
.WORD 


345,67654 
56765,45676 


JRES 




1. 


5103 
5104 


023570 
023576 


177777 

mm 


177777 

— — 


177777 4$: .WORD 


• 1 , *1 ,»l ,«*1 


? ERROR RES, 


f 


c 


5105 
5106 


023600 
023602 


007215 
107202 




5$: 7215 

107202 




JFPS BEFORE EXECUTION • 
?FPS AFTER EXECUTION. 


1 




5107 
5108 


023604 
02360o 


000010 
000000 





6$ J 10 






•FEC 
j FLAG 




1 


5109 
— 511 


023610 
023612 


104164 
000401 




7$! ERROR 
BR 


164 

8$ 


;ST 133 (BUT FIV) NO TRAP 


f 


1 


5111 

5112 


023614 
023616 


1041 55 

000137 


024234 


ERROR 
8$; JMP 


155 

##LLLDONE 




c 




5113 
5114 








JTHIS SUBROUTINE, OVUNDT, IS USED TO SET UP THE OPERANDS, EXECUTE 




1 


5115 
5116 








; THE MULD INSTRUCTION AND CHECK THE RESULTS OF AN INSTRUCTION WITH 
;0PERANDS WHICH SHOULD RESULT IN EITHER OVERFLOW OR UNDERFLOW. A CALL 


t 


1 


5117 
5118 


: 







?TO IT IS HADE 


THUS ; 




i 




5119 
5120 










ACARGs . WORD 
FSRCARG: . WORD 


X,X,X,X JAC OPERAND 
X,X,X,X JFSRC OPERAND 




g 
f 


5121 
5122 






— — — . — — — 




RES; .WORD 
ERRES: , WORD 


X,X,X,X j EXPECTED RESULT 
X,X,X,X JERROR RESULT 


1 


( 


5123 
5124 










FPSBs . WORD 
FPSAS .WORD 


X fFPS BEFORE EXECUTION 
X jFPS AFTER EXECUTION 


1 




5125 
5126 










FEC: .WORD 
FLAG? . WORD 


X jEXPECTED FEC 

X ?0/-l, OVER/UNDER FLOW 


FLAG 


1 


5127 
5128 










ERR1 : ERROR 
BR CONT 


X STRAP ERROR, 


1 


< 


5129 
5130 










ERR2 : ERROR 
CONT: 


X j DATA, RESULT ERROR 

? RETURN ADDRESS 


I 




5131 
5132 








f THE OPERANDS ARE SET UP (USING 


ACO AS THE ACCUMULATOR). THEN 




I 


5133 
5134 


— — 




— 


; THE MULD INSTRUCTION IS EXECUTED. IF THE TRAP OCCURS THEN THE 

I RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS 


1 

IS 


c 


5135 
5136 








^COMPARED WITH 
sTU THE CALLING 


FPSA IF THIS TOO 
ROUTINE AT CONT 


IS CORRECT OVUNDT RETURNS CONTROL 
. IF THE FPS IS BAD OVUNDT 


i 




5137 
5138 








;REPORTS THIS FAILURE AND THEN 
SIN THE SAME WAY. IF THE RESULT 


RETURNS TO CONT. THE FEC IS TREATED 
OF THE 




1 


5139 
5140 








j MULF IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 
SANMCIPATED FAILING DATA PATTERN i ERRES. IF THE FAILURE IN 


1 


I 


5141 








f THE RESULT WAS 
:WILL TRANSFER 


ANTICIPATED CORRECTLY TO BE ERRES THEN OVUNDT 
CONTROL TO THE ERROR CALL AT ERR2 • OTHERWISE THE 


f 



MAIND E Ot 1»D *TPB-A 
DFFpBA.Ptl 



01~NOV-7b 21S06 
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UNDERVOVER" FL0W~, USING MULD WITH TRAPS ENABLED, TEST 



T15 



5143 
5144 



; RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND OVUNDT WILL 
; REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT 



5145 

JAM. 
5147 



j IF NO TRAP OCCURS CONTROL IS PASSED TO ERRl . 
; NOTE THAT OVUNDNT USES THE FLAG 



?T0 TELL WHETHER OR NOT THESE PARTICULAR OPERANDS WILL RESULT IN 



C A A ?\ 

5149 
5150 


023622 


012601 






OVUNDT : 


NOV 


CSP)+#R1 


* fern h nnTuTCD fn ituir Ad^iiuCmtc 


5151 


023624 


012700 


000200 






MOV 


#200. R0 


?SET FD MODE. 


5152 


023630 


170100 








LDFPS 


R0 




5153 
5154 


023632 


010100 








wy^ 


R 1 # RO 


•LOAD AGO, OPERAND. 


5155 


023634 


172410 






--- — 


LDD 


C KO J f ACO 




5156 


















5157 


023636 


010102 








MOV 


rt 4 DO 


• CAlflT TliF HlTi D1TTSDUC TW P1CF HIT 
*oAVC< IrtC Ufti A rn 1 i ILKNO JIN ^AoL UP 


5158 


023640 


010237 


001240 






il| IT 


H*i t P# $TMP3 




5159 
5160 


023650 


Ob 2 7 02 
010237 


A AAA 4 f\ 

00001 
001242 






f\uu 
MOV 


ii a do 

R2 r @# $TMP4 




5161 


023654 


062702 


000010 






ADD 


#10, R2 




5162 


023660 


010237 


001 244 






MOV 


R2 # i> # $TMr5 




3 1 O 3 

5164 


\i £. J w« ** 
a a n £ T ^ 

023672 


012737 


ft ft n A A 

024224 


A A 1 O^ 9 

001246 




MDV 

*S a ^ If 

MOV 


iof di 1 . # <THP 1 O 

IUVDTliP5Jnro 




51 66 


023/00 


016100 


000040 







urn/ 

MOV 


AA/Ol^ OA 

•tUCHl J f KU 


• r nan thf pdc 


5167 


023704 


170100 








LDFPS 


RO 




5168 


023706 


01 2 73 7 


023730 


001236 










5169 


023714 


012737 


023740 


000244 




MOV 


#50$ , #f FPVECT 


;SET UP THE FP TRAP VECTOR IN CASE 


5170 
















?Op ekroh* 


5171 


023722 


010100 








MOV 


R1,R0 


;C0MPUTE THE ADDRESS OF FSRC, 


5172 


023724 


062700 


00001 






ADD 


f 1 0* HO 




* 1 7 3 

51 74 


023 7 30 


4 1 4 A 4 A 

1 71010 






4 * • 

1$ ; 


MULD 






5175 


023732 


170000 






2$: 


CFCC 






5176 


















5177 


023734 


000137 


024164 






JMP 


£#25$ 


JFAILURE, NO TRAP. 


51 78 


















5179 
5180 


023740 
023742 


011602 
02022 7 


0237 32 




50$; 


MOV 

CMP 


CSP),R2 


J TRAP TO HERE AnD SEE IF THE PC OF THE 

J 1H Ar Who 1 fJA i. UP i tie* MULif lNoinLH, 1 iUH, 


5181 
5182 


023746 
023750 


001402 
0001 37 


03661 4 






8E0 

JMP 


51$ 

ta# t" P5PUR 


J BRANCH IF YES. 

. nTurDUi i ce DirDriDf cdiid rnnc CD fDDnD 
J 01 HLHW JL&ts KfeirUKA iarUHiUUo rr ILKKUK* 


5183 
5184 


023754 


02262b 






51$ : 


CMP 


(SP)+t (SP)+ 


; RESET THfc, STACK 




U * £ OO 


1 7 00 fid 








STFP S 
o m. r s w 


R4 


tGFT FPS- 


5186 


02376Q 


170305 








STST 


R5 


?GET FEC. 


5187 
5188 


023762 
023766 


012700 
170100 


000200 






MOV 
LDFPS 


#200, R0 
R0 


JSET FD MODE, 


5189 
5190 


023770 
023774 


012700 
174010 


024224 






MOV 
STD 


#OVDTT,R0 
AC0,(R0) 


I GET THE RESULT , 


5191 
5192 


023776 
024002 


010437 
010537 


001250 
001254 






MOV 
MOV 


R4,@#$TMP7 
R5,##$TMPlt 




5193 
5194 


024006 


012700 


024224 






MOV 


tOVDTT, R0 


?CHECK THE RESULT. 


5195 
5196 


024012 


010102 
062702 


000020 






MOV 
ADD 


R1,R2 
#20. R2 




5197 


024020 


012703 


000004 






MOV 


#4,R3 





5198 0J4024 022022 



Mi 



CMP 



MAINDEOU-DFFPB-A 



DFFPBA.P1 X 
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i' 


5199 


024026 


001027 






BNE 


15$ 






? BRANCH IF INCORRECT. 




5200 


024030 


077 303 






ft ft ft 

SOB 


R3 » 3$ 


— — 




— _ — . • . — — — . 


g 




5201 
52f>2 


Aft A yv ft ft 

024032 


ft ft £ 4 A Jl 

026104 


_ 

ft ft ft A A ft 

000042 


™_™ _ 


CMP 


42 CRl ) t 


A A 

R4 




? W AS r PS CORKLv. 1 f 




« 


5203 
5204 


024036 


001014 






BNE 


10$ 






; BRANCH IF FPS IS INCORRECT, 


< 


I 
1 


5205 
5206 


024040 

A ft A ft A A 

024044 


Alt < « C 

026105 
001002 


A A A A A VI 

00004 4 


— ™~ — — 


CMP 
8NE 


44CR1), 
5$ 


D ft 




i tc per* f* 1* 1 D D K 1 f* T *? 


g 




5207 


024046 


A A A 4 4_ < 

000161 


ft ft ft ft C 

000056 


4$ • 


JMP 


56(R1) 




— ~ 








5208 






















( 


5209 

If ft A A 

5210 


ft ft j| a C ft 

024052 


ft ft C *f £L « 

005 76 1 


ft ft ft A jA il 

000046 


J REPORT 
5$ • 


INCORRECT FEC . 
TST 46(R1) 






•wad inc. HCfOujjj u v CKr LUic ui< uwutiwr uul! j 


4 


t 


E ft # »4 


ft ft jI ft C £. 

024U56 


ft ft € ft ft 

001 002 






BNE 


7$ 










5212 




















J! 
i 




J>2 1 J 


















• RFOnftT RAD WFC flM FjfPEfTFD OVERFLOW 






5214 


024060 


104151 




6$ : 


ERROR 


151 










1 


5215 
5216 


024062 


000771 






BR 


4$ 







: : : , 


I 




C ft, 4 

5217 


A *1 j* A £. A 

024064 






7$ 5 










• DCDnOT D An (Tfc'P DM FYDFrTFH 11 MnFRFT.nW 
JKC.r'Urv* DflU r UN E* At* C*v 1 Ctl U N U&nr LiU" * 


g 
1 


g 


5218 


024064 


104152 




A A a 


ERROR 


152 










5219 


024066 


ft ft A *7 T 

000 /6 7 






BR 


4$ 













5220 






















i 


32«f I 
5/22 


A ~1 4 A "7 A 

0240/0 


003 '61 


A A A A A 

000046 


4 f\ a a 

1 OS * 


INCORRECT FPS. 
TST 46CRU 






• ujc Tup RPCIII.T nVtrR fiO IIWDPR Pl.fliftf? 
JWHD J. n Ct r\C*M»JJUA U V pn un uiiv'&rv r uun , 


i 




5223 


024074 


001002 






BNE 


12$ 






j BRANCH IF UNDERFLOW. 


f 


f 


5224 






















5225 


















? REPORT FPS BAD AFTER OVERFLOW. 






5226 


024076 


104153 




11$: 


ERROR 


153 










f 


5227 


024100 


000762 






8R 


4$ 








( 




5229 























5229 

5J2JU 
5231 

.5232 
5233 

5235 
1216. 



024102 
024102 
024104 



104154 
000760 



12$: 
13$; 



? REPORT FPS BAD AFTER UNDERFLOW. 



ERROR 



154 



8R 



4$ 



024106 012700 024224 



j RESULT INCORRECT. 

15$S NOV #QVDTTf R0 



?SEE IF FAILURE IS ANTICIPATED 



024112 

024114 



010102 
062702 



000030 



NOV 
ADD 



Kl, R2 
#30,R2 



y FA I LURE , 



523? 024120 012703 
5238 024124 022 022 



000004 



16$: 



MOV 
CMP 



5239 024126 001007 
524ft 024130 077303 



#4,R3 
(R0)+ f (R2)^ 
17$ 

HI* 16$. 



; BRANCH IF NOT ANTICIPATED 



5241 

5242 024132 010102 



MQV 



R1,R2 



? ERROR WAS ANTICIPATED SO RETURN 



5243 024134 062702 000054 

5244 024140 010237 QQ1236 

5245 024144 000112 
5246 



ADD 
MOV 



JMP 



#54, R2 
R2,@ #$TMP2 
(R2) 



jTO THE ERROR REPORT IN THE CALLING 
ROUTINE 



5247 024146 005761 000046 



17$ 



TST 



46(R1) 



? RESULT WAS NOT ANTICIPATED 



5249 








;FIRST SEE IF ARGUMENTS SHOULD 


5250 








j HAVE RESULTED IN OVERFLOW OR UNDER 


5251 








jFLOW B i LOOKING AT THE FLAG. 


5252 024152 001002 




BNE 


„A9£ ... ... 


i BRANCH IF UNDERFLOW EXPECTED. 


5253 
5254 








J REPORT RESULT INCORRECT, EXPECTING 



t 



( 



MAINDEC 


~11«0FFPB 


-A 


PDP 11/34 FPP 


DIAGNOSTIC PART 2 


MAC¥11 27(1006) 07-FEB-77 12:06 PAGE 96 








DFFPBA.Pil 01 


-NQV»76 


21 :06 


T15 


UNDERXOVER FLOW, USING MULD WITH TRAPS ENABLED, TEST 








5255 
525b 


024154 
0241 56 


104155 

000733 




18$: 


ERROR 
BR 


155 
4$ 


jOVERFLQW. 








5257 
5258 


024160 






19$ J 






? REPORT RESULT INCORRECT, EXPECTING 








5259 
5260 


024160 
024162 


104156 
000731 




20$: 


ERROR 
BR 


156 
4$ 


; UNDERFLOW . 








5261 
5262 








* IF NO 


FP TRAP 


OCCURS COME HERE. 








5263 
5264 


024164 
024166 


170204 
170305 




25$: 


STFPS 
STST 


R4 

R5 


; GET FPS. 
J GET EEC, 








5265 
5266 


024170 
0241 74 


012700 
170100 


000200 




MOV 
LOFPS 


#200, RO 

RO 


!SET FD NODE. 








5267 
5268 


024176 
024202 


01 2700 
174010 


024224 


_ 


STD 


#OVDTT,R0 
ACOf (RO) 


?GET THE RESULT, 








5269 
5270 


024204 
024210 


010437 
010537 


001250 
001254 




mv 

NOV 


R4, ##$TMP7 
R5, §#$f HP1 1 










5271 
5272 


024214 
024216 


010102 
062702 


000050 




NOV 
ADD 


R1,R2 
#50, R2 


j ERROR WAS ANTICIPATED SO 

j RETURN TO THE ERROR REPORT OF THE 








5273 
5274 


024222 


00Q112 






JMP 


(R2) 


JCALLING ROUTINE. 








5275 
5276 


024224 


000000 


000000 000000 


ovdtt: 


.WORD 


0,0,0,0 










5277 
5278 


024232 


000000 


















5279 024234 

5280 024234 


104412 




LLLDQNE5 

RSETUP 




?GO INITIALIZE THE FPS AND STACK; AND 








5281 
5282 














?SEE IF THE USER HAS EXPRESSED 
;THE DESIRE TO CHANGE THE SOFTWARE 








5283 
5284 














,-VIRTUAL CONSOLE SWITCH REGISTER (HAS 
jTHE USER TKPED CONTROL G? ) . 








5285 
5286 


5287 
5288 


5289 
5290 








j ; #*#**#»###*#♦#♦##*##♦♦*♦####*#*#####*###*##*########*########*# 








5291 
5292 








?*TE$T 

;* 


16 


MODF TEST 










5293 
5294 








?*THIS IS A TEST OF THE MQDF 
•#A SUBROUTINE TO SET UP THE 


INSTRUCTION, WHICH MAKES USE OF 
OPERANDS, EXECUTE THE MODF INSTRUCTION 








5295 
5296 








; * AND 

;* 


CHECK THE 


RESULTS, 










5297 
5298 


.0242 36 


000004 




TST16: SCOPE 








5299 
5300 








:MpOF 


WITH (FSRC=AC=0) 










5301 
5302 


024240 
024240 


IQ44J3 




GGGl; 


LPERR 




;SET UP THE LOOP ON ERROR ADDRESS, 








5303 
5304 


024242 
02424& 


004737 
000000 


025324 
000000 


1$: 


JSR 
• WORD 


" PC,g#MODFSUB 
0,0 


^ & c 








5305 
5306... 


024252 
024256 


000000 
000000 


000000 
000000 


2$: 
3$: 


• WORD 
. WORD 


0,0 
0,0 


?FSRC 

J FRACTIONAL RES. 








5307 
5308 


024262 
024266 


000000 
177777 


000000 
177777 


4$: 
5$: 


.WORD 
.WORD 


0,0 
•1 f •! 


? INTEGER RES. 

? ERROR FRACTIONAL RES. 








5309 
531 0._ 


024272 
024276 


177777 
Q00013 


177777 


6$; 

7$: _ 


• WORD 
13 


-1,-1 


? ERROR INGETER RES. 
jFPS BEFORE EXECUTION . 









_HAJNDEC 


•1 1-DFFPB-A 


POP 11/34 


FPP DIAGNOSTIC PART 2 


MAClU 2711006) 


07-FE6-77 12506 PAGE 97 


DFFPBA. 


PU 01 


-NOV-76 


21:06 


T16 


MQDF TEST 




5311 

5312 


024300 
024302 


000004 
104056 




8$; 


4 

ERROR 


?FPS AFTER EXECUTION. 
56 JSTORE SINGLE ZERO BAD. 


5313 
5314 


024304 
024306 


000401 
104057 






BR 

ERROR 


9$ 

57 ;AC V 1 <= ZERO FAILED, 


5315 
5316 


024310 






9$: 








5317 
5318 


.9243 10 


________ — . 




JMQDF 
GGG2: 


TEST? WITH (FSRC»0) 




5319 
5320 


024310 
024312 


104413 
004737 


025324 




LPERR 
JSR 


?SET UP THE LOOP ON ERROR ADDRESS. 

PC,§#HODFSUB 


5321 
532? 


024316 
024322 


123456 
000000 


076543 
000000 


1$: 
2$: 


.WORD 
.WORD 


123456#76543 

0,0 ! 


?AC 

1 f gRC 


5323 
5324 


024326 
024332 


000000 
000000 


000000 
000000 


3$; 
4$ : 


.WORD 
.WORD 


0,0 i 
0*0 


\ FRACTIONAL RES. 
f INTEGER RESULT. 


5325 
5326 


024336 
024342 


123456 
177777 


076543 
177777 


5$; 
6$: 


.WORD 
♦ WORD 


123456,76543 j 
• 1 # • 1 ; 


f ERROR FRACTIONAL RES, 
; ERROR INTEGER RES. 


5327 
5328 


024346 
024350 


000000 
000004 




7$; 



4 




'FPS BEFORE EXECUTION , 
fFPS AFTER EXECUTION. 


5329 
5330 


024352 
024354 


104056 
000401 




8$; 


ERROR 
BR 


56 
9$ 


f STORE &ERO FAILURE. 


5331 
5332 


024356 
024360 


104057 




9$: 


ERROR 


57 




5333 
5334 








;HODF 


TEST WITH 


CACsO) 




5335 
5336 


024360 
024360 


104413 




GGG3 : 


LPERR 




; SET UP THE LOOP ON ERROR ADDRESS, 


5337 
5338 


024362 
024366 


004737 
000000 


025324 
000000 


1$: 


JSR 
.WORD 


PC , §#MODFSUB 

0,0 i 


;AC 


5339 
5340 


024372 
024376 


076543 
000000 


021234 
000000 


2$; 
3$: 


.WORD 
.WORD 


76543,21234 j 
0,0 ! 


IFSRC 

f FRACTIONAL RES. 


5341 
5342 


024402 
024406 


000000 
000000 


000000 
000000 


4$; 
5$: 


.WORD 
.WORD 


0,0 

0,0 J 


j INTEGER RES. 

r ERROR FRACTIONAL RES. 


5343 
5344 


024412 
02441b 


177777 

000003 


177777 


6$: 
7$» 


.WORD 
3 


*i , -1 j 


f ERROR INTEGER RES, 
fFPS BEFORE EXECUTION, 


5345 
5346 


024420 
024422 


000004 
104053 




3$: 


4 

ERROR 


53 ! 


fFPS AFTER EXECUTION. 
•RES. BAD 


5347 
5348 


024424 
024426 


000401 
104057 






BR 

ERROR 


9$ 
57 




5349 
5350 


024430 






9$; 








5351 
5352 


024430 






; HODF 
GGG4! 


TEST WITH 


EXPONENT OF THE RESULT * 25 


5353 
5354 


024430 
024432 


104413 
004737 


025324 




LPERR 
JSR 


;SET UP THE LOOP ON ERROR ADDRESS, 

PC , $#MQDFSUB 


5355 
5356 


024436 
024442 


046252 
040300 


125252 
000000 


H; 
2$; 


.WORD 
.WORD 


46252,125252 5 
40300,0 l 


I AC 
\ FSRC 


5357 
5358 


024446 
024452 


000000 

046377 


000000 
177777 


3$: 

4$: 


. WORD 
.WORD 


0,0 ! 
46377, wi ; 


f FRACTIONAL RES, 
• INTEGER RES. 


5359 
5360 


024456 
024462 


046252 
040300 


125252 
000000 


5$; 
6$ : 


. WORD 
. WORD 


46252,125252 j 
40300,0 J 


• ERROR FRACTIONAL RES, 
•ERROR INTEGER RES. 


5361 
5362 


024466 
OM470 


000013 
000004 




7$; 


13 
4 




>FPS BEFORE EXECUTION. 
•FPS AFTER EXECUTION. 


5363 
5364 


024472 
024474 


104053 
000401 




8$; 


ERROR 
BR 


53 5 


•ST 134 


5365 

5JL66_ 


024476 

_JQl24M£> 


104060 




_ ._._9JL?_... 


ERROR 


60 
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DFFPBA.Pll 01 


•NOV-76 


215 06 


T16 


MODF f EST 






5367 
5368 




— — ■■ 




JMQDF 


TEST WITH 


EXPONENT OF THE RESULT * 127 




5369 
5370 


024500 
024500 


104413 




GGG5: 


LPERR 


jSET UP THE LOOP ON ERROR ADDRESS. 




5371 
5372 


024502 
024506 


004737 
077652 


025324 
1*5252 


- 

1$: 


JSR 
• WORD 


PC,e#MODFSUB 
77652,125252 jAC 




5373 
5374 


024512 
024516 


040300 
000000 


oooooo 
oooooo 


2$? 
3$ : 


♦ WORD 

• WORD 


40300,0 
0,0 


fFSRC 

r FRACTIONAL RES. 


5375 
5376 


024522 
024526 


077777 
07 /6s/ 


177777 

125252 


4$s 
5$ : 


.WORD 
• WORD 


77777, -1 ! 
77652, 1 25252 


f INTEGER RES. 

•ERROR FRACTIONAL RES, 


5377 
5378 


024532 
024536 


040300 
000000 


oooooo 


6$: 

7$ ! 


• WORD 



40300,0 


f ERROR INTEGER RES • 
fFPS BEFORE EXECUTION. 


5379 
5380 


024540 
024542 


000004 
104053 




8$ 5 


4 

ERROR 


53 


fFPS AFTER EXECUTION. 


5381 
5382 


024544 
024546 


000401 
104060 






BR 

ERROR 


9$ 
60 






5383 
5384 


024550 






9$; 










5385 
5386 


024550 






? MODF 
GGG6S 


TEST WITH 


EXPONENT OF RESULT a 25 




5387 
5388 


024550 
024552 


104413 
004737 


025324 




LPERR 
JSR 


?SET UP THE LOOP ON ERROR ADDRESS* 

PC,£#M0DFSU8 




5389 
5390 


024556 
024562 


046200 
040340 


A A A A A 4 

000001 

oooooo 


1$: 

2 S * 


• WORD 

• WORD 


46200,1 i 
40340,0 J 


•AC 
•FSRC 


5391 
5392 


024566 
024572 


oooooo 

046340 


A A A A A /t 

oooooo 

000001 


3 $ • 

4$ ; 


• WORD 

„/ f\ t*i T\ 

. i*ORD 


0,0 1 
46340,1 J 


f FRACTIONAL RES. 
; INTEGER RES. 


5393 
5394 


024576 
024602 


040000 
177777 


A A A. A A A 

oooooo 

177777 


5$: 
6$ ; 


• WORD 

• WORD 


40000,0 : 
-1,-1 1 


'ERROR FRACTIONAL RES, 
'ERROR INTEGER RES* 


5395 
5396 


024606 
024610 


000013 
000004 




7$; 


13 
4 




'FPS BEFORE EXECUTION, 
fFPS AFTER EXECUTION, 


5397 
5398 


024612 


104061 




8$; 


ERROR 


61 J 


FBAD CONSTANT (NOT 24), 

?0R ST 525 TO 050 INTO 150. 


5399 
5400 


024614 
024616 


000401 
104054 






BR 

ERROR 


9$ 
54 






5401 
54D2 


024620 






9$: 










5403 
5404 


A A £. A 

024620 






J MODF 
GGG7 : 


TEST WITH EXPONENT OF THE RESULT s 24 




5405 
5406 


024620 
024622 


104413 
004737 


025324 




LPERR 
JSR 


;SET UP THE LOOP ON ERROR ADDRESS. 

PC,§>#MODFSUB 




54ft7 
5408 


024626 
024632 


046000 

AAA 1 A A 

040340 


000001 

oooooo 


1$: 
2$ : 


• WORD 

• WORD 


46000,1 j 
40340,0 J 


• AC 
'FSRC 


5409 
5410 


024636 
024642 


040100 
046140 


4% A A A A A 

oooooo 
oooooi 


3$: 
4$ ; 


.WORD 
, WORD 


40100.0 J 

46140.1 3 


'FRACTIONAL RES, 
', INTEGER RESULT. 


541 1 
541 2 


024646 
024652 


000000 
177777 


oooooo 

177777 


5$J 

6$ ; 


• WORD 

• WORD 


0,0 i 
- 1 , • 1 ! 


» ERROR FRACTIONAL RES. 
' ERROR INTEGER RES. 


5413 
5414 


024656 
024660 


000000 
000000 




7$: 








•FPS BEFORE EXECUTION, 
f FPS AFTER EXECUTION. 


5415 
5416 


024662 


104062 




8$: 


ERROR 


62 ! 


jBAD CONSTANT USED (NOT 24) 
'OR ST 525 TO 150 INTO 050 


5417 
5418 


024664 
024666 


000401 
104054 






Br 

ERROR 


9$ 
54 






5419 
5420 


024670 






9$s 










5421 
5422 


024670 






?MODF 
GGG8 : 


TEST WITH 


EXPONENT OF THE RESULT * 10 







MAINDEC 
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DFFPBA.P11 01 


•NOV-76 


21 !06 


T16 


HODF TEST 






t 


5433 
5424 


024670 
024o72 


104413 

004737 


025324 


— „ 


LPERR 
JSR 


?SET UP THE LOOP ON ERROR ADDRESS. 

PC, §#MQDFSU6 






5425 
5426 


024676 
024702 


042577 
040200 


177777 
000000 


l$S 
2$ : 


.WORD 
, WORD 


42577,-1 ?AC 
40200#0 fFSRC 




i 


5427 
5428 


024706 

A A A *f A A 

024712 


040177 
042577 


176000 
140000 


3$; 

4$ ! 


.WORD 
. WORD 


40177,176000 ? FRACTIONAL RES . 
42577,140000 ? INTEGER RES. 




f 


5429 

6 A "1 a 

5430 


024716 
024722 


177777 
177777 


177777 
177777 


5$; 
6$ 5 


.WORD 
. WORD 


-1,-1 ; ERROR FRACTIONAL RES. 
-1,-1 ; ERROR INTEGER RES, 






5431 
5432 


024726 
024730 


000000 

A A A A A A 

000000 




7$: 






;FPS BEFORE EXECUTION . 
J FPS AFTER EXECUTION. 




5433 
5434 


024732 
0247 34 


104053 
000401 




8$S 


ERROR 
BR 


53 
9$ 






« 


5435 
5436 


024736 
024740 


104054 




9$ t 


ERROR 


54 








5437 
5438 










TEST WITH 


THE EXPONENT OF THE RESULT s 10 




1 


5439 
5440 


024740 
024740 


4 A A A A 'i 

104413 




GGG9 5 


LPERR 


5 SET UP THE LOOP ON ERROR ADDRESS. 




€ 


544t 
5442 


024742 
024746 


004737 
042577 


025324 
140001 


1$ S 


JSR 

• WORD 


PC, $#MODFSUB 
42577#140001 1 


?AC 


f 


5443 
5444 


024752 
024756 


040200 
034&00 


000000 
000000 


2$; 
3$ : 


.WORD 
♦ WORD 


40200,0 
34600,0 


•FRACTIONAL RES. 


5445 
544t> 


024762 

ft A 1 £. £. 

024766 


042577 

A A A A A A 

000000 


140000 
000000 


4$; 
5$ S 


.WORD 
• WORD 


42577,140000 i 
0,0 


r INTEGER RES. 

; ERROR FRACTIONAL RES. 


1 


5447 
5448 


024772 
024/76 


177777 

000000 


177777 


6$: 
7$ ? 


• WORD 



•1 , -I 5 


*, ERROR INTEGER RES • 
;FPS BEFORE EXECUTION. 




5449 
5450 


025000 

A -."V ft* v-, A A 

025002 


000000 
104063 




A A • 

8$ : 




ERROR 


63 : 


?FPS AFTER EXECUTION. 

iST 532 TO 122 INTO NORMALIZE. 


A 

1 


5451 
5452 


025004 

A A ^ A A £. 

025006 


000401 
1 04054 






BR 

ERROR 


9$ 
54 






€ 


5453 
5454 


025010 






9$s 












5455 
5456 


025010 


— _ — 




IMODF 
GGG1 : 


TEST WITH 


EXPONENT OF THE RESULT = 9 




t 


5457 
5458 


025010 
025012 


104413 
0047 37 


025324 




LPERR 
JSR 


; SET UP THE LOOP ON ERROR ADDRESS. 

PC,i*M0DFSU8 




i 


5459 
546o 


025016 
025022 


042377 
040200 


100000 

000000 


1$: 

2$ 1 


« WORD 
• WORD 


42377#100000 \ 
40200,0 ! 


;AC 
FSRC 




5461 
5462 


025026 
025032 


000000 
042377 


000000 

100000 


3$; 
4$ : 


.WORD 
.WORD 


0,0 1 
42377.100000 ! 


•FRACTIONAL RES. 
'INTEGER RES. 


< 


5463 
5464 


025036 
025042 


177777 
177777 


177777 

JL21I77 


5$5 

6s; 


• WORD 
- WORD 


* 1 1 » 1 5 


•ERROR FRACTIONAL RES, 
' ERROR INTEGER RES. 


« 


5465 


025046 
O2&0.5O... 


000013 
.00.0004 




7$S 


13 
4 




» FPS BEFORE EXECUTION. 
•FPS AFTER EXECUTION. 




5467 
546fL 


025052 
J)2_5.Q.5Jl 


104053 

_Q-00..401.„ 




8$: 


ERROR 
»R 


53 
9$ 






1 


5469 
5470 


025056 
025060 


104054 




9$: 


ERROR 


54 






1 


5471 
5472 








; MODF 


TEST wITH 


EXPONENT OF THE RESULT = 




i 

t 


5473 
5474 


025060 
02506JL 


— .. 
104413 




GGGll: 


LPERR 


;SET UP THE LOOP ON ERROR ADDRESS. 




5475 
5476 


025062 
025066 


004737 
040177 


025324 
177777 


IS! 


JSR 
. WORD 


PC,@#MODFSUB 
40177,-1 :AC 




i 


5477 
5478 


025072 
025076 


040200 
040177 


000000 
177777 


2$: 
3s: 


. WORD 
.WORD 


40200,0 ?FSRC 

40177, •! ; FRACTIONAL RES. 
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jtj 


DFFPBA,Plt 01 


-NOV-76 


21 !06 


T16 


MQDF TEST 








E 


i 


5479 
5480 


025102 
025106 


000000 
000000 


000000 
000000 


4$: 
5$; 


, WORD 
.WORD 


0,0 
0*0 


; INTEGER RES. 

? ERROR FRACTIONAL RES, 




< 




5481 
5482 


025112 
025116 


040177 
000017 


177777 


6$; 
7$: 


.WORD 
17 


40177,-1 


y ERROR INTEGER RES. 
;FPS BEFORE EXECUTION. 






l 


5483 
5484 


025120 
025122 


000000 
104064 




8$ : 




ERROR 


64 


;FPS AFTER EXECUTION . 
SST 041 TO 046 INTO 246, 




4 


4 


5485 
5486 


025124 
025126 


000401 
104064 






BR 

ERROR 


9$ 
64 








1 




5487 
5488 


025130 


> 




9$; 














% 


5489 
5490 


025130 






; MQPF 
GGG12? 


TEST WITH 


EXPONENT OF THE 
_____ — _ — _ — ______ 


RESULT = -15 




I 


4 


5491 
5492 


025130 
025132 


104413 
004737 


025324 




LPERR 
JSR 


PC, if MODFSUB 


?SET UP THE LOOP ON ERROR 


ADDRESS, 


< 




5493 
5494 


025136 
025142 


034377 
040200 


177777 
000000 


1$; 
2$$ 


.WORD 
.WORD 


34377,-1 
40200, 




►AC 
•FSRC 


4 


5495 
5496 


025146 
025152 


034377 
000000 


177777 
000000 


3$s 
4$S 


.WORD 
.WORD 


34377,-1 
0,0 




* FRACTIONAL RES, 
I INTEGER RES. 




( 


€ 


5497 
5498 


025156 
025162 


000000 
034377 


oooooo 

177777 


5$; 
6$ : 


.WORD 
.WORD 


0,0 

34377,-1 




• ERROR FRACTIONAL RES, 
' ERROR INTEGER RES. 




f 




5499 
5500 


025166 
025170 


000000 
000000 




7$ s 










•FPS BEFORE EXECUTION. 
'FPS AFTER EXECUTION, 


4 


5501 
55f»2 


025172 
02517 4 


104064 
000401 




8$: 


ERROR 
BR 


64 

9$ 








4 


« 


5503 
5504 


025176 

025200 


104064 




9 S 5 


ERROR 


64 








i 




5505 
5506 








?MODF 


TEST WITH 


EXPONENT OF RESULT s -64, IN ROUND MODE 






c 


5507 
5508 


025200 
025200 


104413 




GGG13S 


LPERR 




?SET UP THE LOOP ON ERROR 


ADDRESS. 


( 


f 


5509 
5510 


025202 
025206 


004737 
020000 


025324 
000001 


I $ • 


JSR 
.WORD 


PC, iiMODFSUB 
20000, 1 




(AC 




f 




5511 
551 2 


025212 
025216 


040300 
020100 


oooooo 

000002 


2$: 
3$ : 


.WORD 
.WORD 


40300,0 
20100,2 




(FSRC 

I FRACTIONAL RES, 


% 


551 3 
551 4 


025222 
025226 


000000 
020100 


oooooo 

000001 


4$: 
5$ s 


, WORD 
.WORD 


0,0 

20100,1 




( INTEGER RES. 

( ERROR FRACTIONAL RES, 




4! 


4 


5515 
5516 


025232 
025236 


000000 
000000 


oooooo 


6$; 
7$s 


.WORD 



0,0 




(ERROR INTEGER RES, 

(FPS BEFORE EXECUTION. f 




5517 
5518 


025240 
025242 


000000 
104065 




8$ S 




ERROR 


65 




(FPS AFTER EXECUTION, 
(ROUND TRUNK, ST 126 INTO 


ROUND, 




t 


5519 
5520 


025244 
025246 


000401 
104054 






BR 

ERROR 


9$ 
54 








4 


€ 


5521 
5522 


025250 






9$? 












4 




5523 
5524 


025250 






JMQDF 
GGG14: 


TEST WITH 


EXPONENT OF RESULT » 1 1 






% 


5525 
5526 


025250 




10441 3 
00473? 


025324 




LPERR 
JSR 


PC,##MODFSUB 


jSET UP THE LOOP ON ERROR 


ADDRESS. 


4 


€ 


5527 
5528 


025256 
025262 


142777 
040200 


170000 

oooooo 


1$: 
2$: 


.WORD 
. WORD 


142777* 170000 
40200,0 




'AC 

•FSRC f 




5529 
5530 


025266 
025272 


140000 
142777 


oooooo 

160000 


3$; 

4$ 5 


.WORD 
.WORD 


140000,0 
142777, 160000 




• FRACTIONAL RES. 
(INTEGER RES. 


1 


5531 
5532 


025276 
QJJMGj! 


040000 
042777 


oooooo 

160000 


5$; 
6$; 


.WORD 
• WORD 


40000,0 
42777, 160000 




(ERROR FRACTIONAL RES. 
(ERROR INTEGER RES. 




C 


1 


55 3 3 
5534 


025306 
... 0.25310 


000007 

ooooio 




7$: 


7 

to 






(FPS BEFORE EXECUTION. 
(FPS AFTER EXECUTION. 




t 



MAIN DEO 1 1 »t>FFPb*A 
DFFPBA.PU 01-NQV-76 2l?06 



PDP 11/34 FPP 



5535 
5536 



025312 
025314 



5537 
5538 



025316 
02532Q 



104066 
000401 
104067 
000161 



5539 
5540 



5541 
5542 



5543 



5545 
5546 



5547 
5548 



5549 
5550 



5551 
1332. 



DIAGNOSTIC 
T16 

8? 



PART 2 NACY11 
MODF TEST 



27(1006) 07-FEB-77 12;06 PAGE 101 



9$ 



FRROR 
8R 

ERROR 
JMP 



66 
9$ 
67 

GGGDONE 



?SIGN OF FRACTION 



?SIGN OF INTEGER, 
;GO TO NEXT TEST . 



THIS SUBROUTINE, MODFSUB, IS CALLED TO SETUP THE 

OPERANDS, EXECUTE THE MODF IN ST RUCTION AND CHECK. THE RESULTS, 



IT IS CALLED THUS I 



ACARG: .WORD X,X 
FSRCARG; . WORD X,X 



FRES: .WORD X,X 

INTRES ; . WORD X ,X 

ERFRES 5 . WORD X,X 

ERINTRES * , WORD X,X 



FPSB : 
FPSAS 



.WORD 
.WORD 



AC OPERAND 
FSRC OPERAND 



FRACTIONAL RESULT 
INTEGER RESULT 



ERROR FRACTION RESULT 
ERROR INTEGER RESULT 



FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 



c 



m 



5553 
5554 



5555 
5556 



5557 
5558 
5559 
5560 



5561 

AIM. 



556 3 
5564 



5565 
5566 



5567 
5568 



5569 



ERR X ! 



ERROR 
BR 



X 

CONT 



FRACTION ERROR 



ERR2: 

CONTS 



ERROR 



5 INTEGER ERROR 
j RETURN ADDRESS 



THE OPERANDS ARE SET UP (USING ACQ FOR THE AC ARGUMENT). THE MQDF 



INSTRUCTION IS EXECUTED. THEN THE RESULTS ARE RETRIEVED. 

THE FRACTION PART OF THE RESULT IS COMPARED WITH FRES. IF THIS IS CORRECT 



THEN THE INTEGER PART IS COMPARED WITH INTRES. IF BOTH OF THESE ARE CORRECT 
THEN THE FPS IS COMPARED WITH FPSA. AFTER E XECUTION IF NO ERRORS OCCURRED 



THEN MODFSUB WILL RETURN TO CONT. IF THE FPS WAS INCORRECT 

IT IS REPORTED HERE. IF THE FRACTION IS INCORRECT IT IS COMPARED WIT H 



THE ANTICIPATED BAD FRACTION f ERFRES, IF THIS DOESN'T HATCH 
THE TRUE RESULT THEN T HE ERRO R IS REPORTED H£RK, IF THE ANTICIPATED 
FAILURE HATCHES THE TRUE RESULT THEN MODFSUB PASSES CONTROL TO THE 
ERROR CALL AT ERR1. LIKEWISE IF THE INTEGER PART OF THE RESULT IS 
NOT CORRECT THEN IT IS COMPARED WITH THE ANTICIPATED INTEGER 
FAILURE. IF THIS DOEN 1 T MATCH THEN THE ERROR IS REPORTED HERE. 



5571 






;IF A 


MATCH IS 


HADE HOWEVER, 


MODFSUB 


WILL RETURN CONTROL TO THE ERROR 


5572 






'CALL 


AT ERR2. 








5573 
5574 


025324 


012601 


MODFSUB : 


MOV (SP)+ 


,R1 


jGET A POINTER TO THE ARGUMENTS 


5575 


025326 


012700 


000200 


MOV 


#200, RO 


?SET 


FD MODE, 


5576 


025332 


170100 




LDFPS 


RO 






5577 


025334 


010100 




MOV 


Rl - RQ 


:SET 


UP ACO 


5578 


025336 


172410 






(RO),ACO 






5579 


025340 


012700 


025702 


MOV 


#MODP1,RO 


5PUT 


A BACKROUND PATTERN INTO ACL 


5580 


025344 


172510 




LDD 


(R0),AC1 






5581 


025346 


016100 


000030 


MOV 


30(R1),R0 


?SET 


UP THE FPS, 


5582 


025352 


170100 




LDFPS 


RO 






5583 


025354 


012737 


025370 001236 


MOV 


#l$ # e#$TMP2 






5584 


025362 


010100 




MOV 


Rl,RO 


;COMPUTE THE ADDRESS OF THE FSRC. 


5585 


025364 


062700 


000004 


ADD 


#4,R0 






5586 
















5587 


025370 


171410 


1$: 


MODF 


(R0),AC0 


JEXECUTE THE TEST INSTRUCTION. 


5588 
















5589 


025372 


170204 




STFPS 


R4 


* GET 


THE FPS. 


5590 


025374 


012700 


000200 


MOV 


#200, RO 


?SET 


FD MODE. 







MAINDEC 


-U-OFFPE 


-A 


PDP 11/34 FPP 


DIAGNOSTIC PART 2 


MAC*!! 27(100b) 


07-FEB-77 12;06 PAGE 102 




IP 


DFFPBA.PH 01 


•NQV»76 


21S06 




T16 MODF TEST 






I 


5591 
5592 


025400 
025402 


170100 
012700 


025662 




LDFPS 
MOV 


RO 

I^ODFTOf RO 


J GET THE FR ACTIONAL RESULT , 






5593 
5594 


025406 
025410 


174010 
012700 


025672 




STD 
MOV 


ACO, CRO) 
#M0DFT1 / PO 


? GET THE INTEGER RESULT, 




1 


5595 
559$ 


025414 


1741 10 






STD 


ACU (RO) 






1 


5597 
5598 


025416 
025420 


010102 
010237 


001240 




NOV 
MQV 


R1,R2 

R2# §#$TMP3 


JSAVE THc, DATA IN CASE Or ERROR* 




g 
1 


5599 
5&0Q 


025424 
025430 


062702 
010237 


000004 
001242 




ADD 
MOV 


#4,R2 

R2* ##$TMP4 






5601 
56<!2 


025434 
025440 


062702 
010237 


000004 
001244 




ADD 
MOV 


#4#R2 

R2# 9#$TMP5 






< 


5603 
5604 


025444 
025450 


062702 
010237 


000004 
001246 




ADD 
MOV 


#4, R2 

R2»i#$TMP6 








5605 
5606 


025454 
025462 


012737 
012737 


025662 
025672 


001250 
001252 


MOV 
MOV 


IMODFTOf §#$TMP7 
tMODFTl , ##$TMP10 






1 


5607 
5608 


025470 
025474 


010437 
016137 


001254 
000032 


001256 


MOV 
MOV 


R4,##$TMP11 
32CR1 ),g#$TMP12 






1 


5609 
5610 


025502 


012702 


025662 




MOV 


#M0DFT0,R2 


JCHECK THE FRACTIONAL RESULT. 






5611 
5b 12 


025506 
025512 


0261 12 
001022 


000010 




CMP 

BNE 


10(R1)#(R2) 
10$ 


; BRANCH IF INCORRECT. 




1 


5613 
5614 


025514 
025522 


026162 
001016 


000012 


000002 


CMP 

BNE 


12(R1), 2CR2) 
10$ 






i 


5615 
5616 


025524 


012702 


025672 




MOV 


IMODFT 1 i R2 


5CHECK THE INTEGER RESULT * 






5617 
5618 


025530 
025534 


0261 12 
001026 


000014 




CMP 
BNE 


14CR1), (R2) 

15$ 


J BRANCH IF INCORRECT, 




4C 
1 


5619 
5620 


025536 
025544 


026162 
001022 


000016 


000002 


CMP 
8NE 


16(R1),2(R2) 
15$ 






c 


5621 
5622 


025546 


026104 


000032 




CMP 


32(R1),R4 


JCHECR the fps. 






5623 
5624 


025552 


0010 34 






BNE 


20$ 


jBRANCH IF INCORRECT, 




5625 
5626 


025554 


000161 


000042 




9$5 JMP 


42CR1) 


JRETURN , 




c 


5627 
5628 


025560 


026112 


000020 




j FRACTIONAL ERROR. 

10$? CMP 20(R1),(R2) 


?wAS THE ERROR ANTICIPATED? 






5629 
5630 


025564 
025566 


001010 
026162 


000022 


000002 


BNE 
CMP 


IIS 

22CR1), 2CR2) 


?foRANCH IF NOT ANTICIPATED, 




1 


5631 
5632 


025574 
025576 


001004 
010102 






BNE 
MOV 


11$ 
R1,R2 


\ THE ERROR ¥s?AS ANTICIPATED SO 




t 


5633 
5634 


025600 


062702 


000034 




ADD 


*34, R2 


?RETURN TO THE ERROR REPORT AT THE 
jCALLING ROUTINE, 






5635 
5636 


025604 


A A £X 4 S *^ 

0001 1 2 






JMP 


(R2) 






4r 
1 


5637 
5638 


025606 
025606 


104053 







11$: 

12$: ERROR 


53 


J THE ERROR WAS NOT ANTICIPATED SO 
j REPORT THE INCORRECT FRACTION HERE, 




t 


5639 
5640 


025610 


0007t>t 






BR 


9$ 






m 


5641 
5642 


025612 


026112 


000024 




J INTEGER ERROR, 
15$ S CMP 


24(R1), (R2) 


;*A$ THIS ERROR ANTICIPATED? 




5643 
5644 


025616 
025620 


001010 
026162 


000026 


000002 


BNE 
CMP 


16$ 

26(R1),2(R2) 


JbRANCH lr NU1, 




c 


5645 
564b 


025626 


001004 
010102 






BNE 
MOV 


16$ 
Ri,R2 


t THE ERROR WAS ANTIC! APTED SO RETURN 





i 





MAINDEC 


*11*DFFP8 


-A 


PDP U/34 FPP 


DIAGNOSTIC 


PART 2 


MAC If 11 27( 1006) 


07-FEB-77 12:06 PAGE 103 




DFFP6A.Pl 1 01 


•NOV-76 


21 : 06 


T16 


NODF TEST 




1 , 


5647 

5648 


025632 


062702 


000040 




ADD 


#40, R2 


?TQ THE ERROR REPORT IN THE CALLING 
5R0UTINE. 




5649 
5650 


025636 


0001 12 






JMP 


(R2) 




1 


5651 
5652 


025640 
025640 


104054 




16$ ; 
17$; 


ERROR 


54 


? THE ERROR WAS NOT ANTICIPATED SO REPORT 
? THE INTEGER FAILURE HERE* 


1 


5653 
5654 


025642 


000744 






BP 


9$ 






5655 
5656 


AMP £ M M 

025644 


010437 


001254 


,'FPS INCORRECT, 
20$: MOV 


R4, tP#$TMPl S 


5REP0RT INCORRECT FPS t 


g 


5657 
5658 


025650 
025656 


016137 
104055 


000032 001256 


21$: 


MOV 
ERROR 


32(R1),§#$TMP12 
55 




t 


5659 
5660 


025660 


000735 






8R 


9$ 






5661 
5662 


025662 
025670 


000000 
000000 


oooooo 000000 


MODFT0: 


• NORD 


0,0,0,0 




t 


5663 
5664 


025672 


000000 


oooooo oooooo 


M00FT1? 


.^ORD 




0,0,0,0 




1 


5665 
5666 


025700 


000000 














5667 
5668 


025702 
025710 


177777 

177777 


177777 177777 


M00P1 : 


• WORD 






il. 


5669 
5670 


025712 






GGGDONE: 








1 


5671 
5672 


025712 


104412 






RSETUP 




!GO INITIALIZE THE FPS AND STACK? AMD 
?5EE IF THE USER HAS EXPRESSED 



E 
< 

4 
< 
€ 
1 
I 

( 

t ! 

c 
I 

i ! 

C 
c 

c = 

( 

c 1 
c 



I 
i 
f 
i 
t 
i 
i 
c 



5673 
5674 
5675 
5676 



?TH£ DESIRE TO CHANGE THE SOFTWARE 
^VIRTUAL CONSOLE SWITCH REGISTER (HAS 



; THE USER TifPED CONTROL G?>. 



5677 
5678 



5679 
5680 



5681 
5682 



MQDD TEST 



5683 
5684 



J*TEST 17 

1*THtS TTT TEST OF THE MqDD INSTRUCTION . IT HAKES USE OF A SUBROUTINE 
;*TQ SET UP THE ARGUMENTS , EXECUTE THE INSTRUCTION AND CHECK THE 



5685 
5686. 



^♦RESULTS. 

J_* , 



5687 

568ft 025714 000004 



T£T1 7 i SCOPE 



5689 
5690 



5691 025716 

.5692 025716 1Q4413 



? MQDD WITH (FSRCsACsQ) 
HHHl; 

LPERR 



;SET UP THE LOOP ON ERROR ADDRESS, 



5693 025720 004737 027422 JSR 

5fc<H 025724 OOOOOO OOOOOO OOOOOO 1$; .WORD 

5695 025732 000000 

5696 25734 00 0000 OOOOOO 00 0000 2$: 

5697 025742 000000 



PC,£#MODDSUB 



J_AC 



.NQRD 0,0,0,0 



;FSRC 



5698 025744 OOOOOO OOOOOO 000000 3$: 

I 5699 025752 000000 

UM 025754 OOOOOO OOOO OO OOOOOO 4 $: 

5701 025762 000000 

* 5702 025764 OOOOOO OOOOOO OOOOOO 5$: 



.NQRP 0,0.0,0 



j FRACT IONAL RES, 



; INTEGER RES. 



.WORD 0,0,0,0 



? ERRO R FRACTIONAL RES. 



w 



MAINDEC-11-DFFPB-A 



PDP 11/34 FPP DIAGNOSTIC PART 2 MACUl 27(1006) 07-FEB-77 12:06 PAGE 104 



DFFPBA.PU 



01-NQV-76 21S06 



T17 



moo TEST 



t 

i. 


5703 

5704 


025772 
025774 


000000 

/\ J\ (\ f\ f\ f% 

000000 


A A A A. A A 

000000 


4 inn 

17 7 77 7 


6S * 


i_i n 1*\ 
^ ¥? u r> 1/ 


A A _ 4 4 

U 1 U f •{ | "1 


■ t'DOnD f UTPrt'O DPS 

•LRROR iN 1 bbtiR Kb5i 




5 / SJ5 

5706 


/\ ^1 £. A jI 

026004 


4 T 7 7 7"7 

I r f t f ( 

A A A **J A A 

000200 






7 6 • 

75 • 


^% A A 

200 




•rP5 Btr UKt e>ACik.U Jl 1UN « 




5707 


026006 


000204 









204 




;FPS AFTER EXECUTION, 




5708 


026010 


4 A A A A 

104070 


_____ 




8$ I 




70 




i 


5709 
5710 


A 1 £. A 4 *» 

0260 1 2 

A *1 £ A 4 A 

026014 


A A A A A 4 
000401 

4 A A A *? A 

1040 74 








&RH0R 


rt * 
¥ 9 

7 A 
/ 4 


— . _ — _ — — — — 

• CT 711 T n 1A7 TjilTTl 1A1 
*pi 241 1U 142 XNiU 




5711 


02601b 








A * • 

9$ ? 










.5712 


















1 


5713 
5714 


A. £ A 4 2~ 

026016 








; MUUU 

»t tl (\ m 


TCCT it! T TU 

i &5> 1 wi 1 1 n 


F C D P — A 

— 






5715 


026016 


4 A A A 4 3 

10441 J 








T DC QD 




, cjtt 110 twf i.nnp ndi pconp innpF'is 

7 OIL 1 Ur 1 nCi LUUr U« fc^nUr AUUnLOO « 


g 
1 


5716 


A if A A a 

026020 


004737 


A ^ *9 jI A A 

027422 






ICO 


PL f ^fMUPOoUB 






5717 




a 4 *> 1 a e; 
I 2 445 


A £ T A 4 '1 

06701 2 






« WUKU 


UJ.24**5#D/Ul_ 


; Aw- 




5718 


0260 30 


034567 


012345 






» WOBP 


1 AC4.1 A 4 OlAC 

4 4567f 012445 




1 


5719 


026034 


A A A A A A 

000000 


A A A A A A 

000000 


A A ^\ A A 

000000 


2$ ! 


l> n d r\ 
» WORD 


A A A A 

Of Or Of 


y r £>RL 




C *1 1 A 

5720 


026042 


A, A A A A J** 

000000 
















5721 


A 1 £ A A A 

026044 


A A J\ A A * & * 

000000 


A A A A A A 

000000 


A A A. A. /\ 

000000 


4$ ; 


» WORD 


A A A A 

r f f 


1 t'D AfT 1 HUAt bPC 

J r R 1 4UN Alt Ht£) • 


1 


C T f% A 

5722 


A *1 IL A C 1 

026052 


A A A A A A 

000000 
















5/24 


026054 


A A A A A A 

000000 


A A A A A A 

000000 


A AAA AA 

oouooo 


A £ » 


# WUKM 


A A A A 

Of Of o# u 






5 724 


A 1 £. A a 

026062 


000000 














« 


5725 


026064 


012345 


067012 




5$; 


• WORD 


012345, 67012 


? ERROR FRACTIONAL RES, 




tint 

5 7 26 


A & A 7 A 

0260 70 


04456 7 


A 4 Tint 

012 445 








4456 /f012445 






5 7 2 / 


AO K A 1 A 

0*60 / 4 




4 7 7 7 7 7 
1 / / 7 / / 


4 77777 
17//// 


»9f 




_ % _ 4 _ 4 _4 




1 


5728 


026 J 02 


1 inn 

17 7 7 7 7 
















C Till 

57 29 


02610 4 


A A A 1 4 'J 

0002 1 4 






7 * » 

75 • 


7 1 1 
2 1 4 





• erne Aprncir v y ptiit t nw 




57 30 


A I £. * At. 

026106 


A A A *"» A A 

000204 








O A A 

204 




JrrJS At* I C.K LAIdv, U 1 JLUN • 


1 


5731 

5732 


026110 

A #^ C 4 4 'i 

026112 


104075 
000401 






8$; 


ERP0R 
BR 


75 
9$ 


?ST0RE DOUBLE ZERO 






A *V& 4 4 A 

0261 1 4 


4 A A A 7 fc. 

1040 / 6 






— 


fcRROR 


7 #» 






57 34 


0261 16 








9$ ? 










5735 




















57 3o 










■1 ikJ f\ T\ 


<VC ct y TTU 

I LST rtlin 


f h f* — A 1 






tin 

5 7 4 7 

57 3 s 


A 71%. 1 1 i 
046 1 IO 

A "1 JL 4 4 fa. 

0261 16 


4 A A A 4 i 

10441 4 






rsitn $ Z 


Itr fcHK 








5 / j? 


ft it. < *> A 
02"! 20 


A A 4 7 ~it 


ft 7 7 4 7 7 

02 / 422 






y on 


"v f P» ™Uy UoU0 






57*0 


A 7 w 1 OA 

026 1 * 4 


A A A A A A 

000000 


A A A A A A 

000000 


A A A A A A 

000000 


IS? 


1,1 n d f\ 


A A A A 
f f f 


* ac 




5741 
5742 


026132 
026134 


000000 
072 7 27 


1 2 7272 




* • 
2$ * 


l.v f*V J-f. f\ 

. W0RP 


7 2 727f 111211 


J r SRv 




5 74J 


A "1 fc. 4 A A 

0261 40 


A 7 O 7 1 7 

Villi! 


4 1 T T 1 

12 7 2 72 






# pf U t\ u 


7 7 7 O 7 4 07770 
flll'tll'l'l 






5 7 44 


0261 44 


f\ A *\ A A A 

000000 


A A A A #V A 

0QO000 


. OJJOJLO 


4S " 


. WUKU 


A A A A 

0* 0# 0* 


• ronrTTHMii DF<5 
• r KAv I A UW AU Ktw, 




5 7^5 


0*01 5* 


AA AA AA 

000000 
















5 7 46 


Alt* C A 

0261 54 


A A A A A A 

000000 


A A A A A A 

000000 


A t A A A A /\ 

000000 


45 • 


, WORu 


A A A A 

Of Of Of 


* IN 1 bVjt.R Klo , 




j / ** / 

C140 

5 7 4 


02616 4 


A A A rt A A 
00 vOOU 

4 7 7 7 7 7 

1 I 1 1 1 1 


4 inn 

17 7 7 7 7 


4 "J 7 7 *I 7 

17/777 


55 • 


i«l r** 1*% F\ 

• WORD 


4 4 _ 4 4 

•lf»lf«if»l 


J LRROR r RAL 1 1 0NAL Rfc»o, 




3 / *7 


A > A 1 7 
U/Dl / 


4 7 7 7 7 7 

\ 1 1 1 I 1 
















tie a 

5750 


A 1 4 *f A 

02617 4 


4 nin 

17 7777 


177777 


177777 


6$ ; 


t NQRD 


t 4 4 4 
•lf-lf-lf-l 


? ERROR INTEGER RES, 




5751 


026202 


177777 
















5 7 52 


A O (% 7 A A 
2 2 v H 


A A A O 4 "5 

000 21 4 






7 6* 


214 




"r P5 (?tf UKt & A&v U 1 1 UN , 




5753 


026206 


000204 








204 




jFPS AFTER EXECUTION, 




5754 


026210 


104070 






8$: 


ERROR 


70 






5755 


026212 


000401 








BR 


9$ 






5756 


026214 


I040_7_l 








ERROR 


71 




i 


5757 

575 1, 


026216 








9$; 











MAINDEC 


-1 1-DFFPB 


*A 


PDP t 1/34 FPP 


DIAGNOSTIC PART 2 


MACfll 27(1006) 


07-FEB-77 U:0b PAGE 105 


1 - 


DFFPBA.PU 01 


-N0V-76 


21 506 




T17 


MODD TEST 




1 


5759 
5760 


026216 








JMODO 
HBH4 J 


TEST WITH 


EXPONENT OF THE 


RESULT s 57 




5761 
5762 


026216 
026220 


104413 
004737 


-£27-422 







LPERR 
JSP 


PC $ SfiMODPSUB 


J SET UP THE LOOP ON ERROR ADDRESS. 


1 


5763 
5764 


026224 
026230 


056252 
125252 


125252 
125250 




1$; 


, WORD 
.WORD 


5&2S2, 125252 
1 25252*125250 


? AC 


1 


5765 
5766 


026234 
026242 


040300 
000000 


000000 


oooooo 


2$: 


.WORD 


40300,0,0,0 


;FSRC 




5767 
5768 


026244 
026252 


000000 
000000 


000000 


oooooo 


3$: 


• WORD 


0,0,0,0 


jFRACTIONAL RES. 


1 


5769 
5770 


026254 
026262 


056377 
177774 


177777 


177777 


4$$ 


.WORD 


56377, -1,-1,-4 


; INTEGER RES« 


1 


5771 
5772 


026264 
026270 


000000 
125252 


000000 
1 25252 




5$; 


.WORD 
.WORD 


0,0 

125252, 125252 


JERROR FRACTIONAL RES« 




5773 
5774 


026274 
026302 


056377 
177777 


177777 


177777 


6$; 


, WORD 


56377, ~1 ,-l f «l 


jERROR INTEGER RES, 


4 


5775 
5776 


026304 
026306 


00021 3 
000204 






7$: 


213 
204 




JrPS BErORE EXECUTION. 
JFPS AFTER EXECUTION, 


€ 


5777 


026310 
026312 


104077 
000401 


— — — : — — 




8$: 


ERROR 
BR 


77 
9$ 


?ST 526 JLU li4 1NAU I 3d 




5779 
5780 


026314 
026316 


104077 






9$ * 


ERROR 


77 




1 


5781 
5782 










* &j r\ n\ 


TEST WITH 


EXPONENT Or Trie. 


RESULT » 79 


i 


5783 
5784 


026316 
026316 


104413 






HHH5: 


LPERR 




ISET UP THE LOOP ON ERROR ADDRESS. 




5785 
5786 


026320 
026324 


004737 
140240 


027422 

j\ #k g% a A J*fc 

000000 


A A t% j\ y\ 

oooooo 


4 a 

1$ : 


JSR 
.WORD 


PC,§#MODDSUB 
1 40240,0,0,0 


?AC 


1 


5787 
5788 


026332 
026334 


000000 
063714 


14631 4 




2 $ I 


• WORD 


63714, 146314 


JFSRC 


I 


5789 
5790 


026340 
026344 


133572 
000000 


167737 
000000 


— : _ — 

oooooo 


3$ : 


.WORD 
. WORD 


133572,167737 
0,0,0,0 


? FRACTIONAL RES. 




5791 
5792 


026352 

a nil H £T A 

026354 


000000 
163777 


4 "t 1 *l ^1 

177777 




4$S 


• WORD 


163777 , •! 


f INTEGER RES. 


■ 


5793 
5794 


026360 
026364 


1625 31 
177777 


125726 
U7777 


mm 


5$ S 


.WORD 
.WORD 


162531,125726 

*»i*"i#""i#*i 


! ERROR FRACTIONAL RES. 


l 


5795 
5796 


026372 
026374 


a *i ^ f*i n ^ 

177777 
063777 


177777 




6$ : 


• WORD 


63777,-1 


J ERROR INTEGER RES. 




5797 
5798 


026400 
026404 


162531 
000210 


125726 




7$ ! 


,WORD 
210 


162531,125726 


?FPS BEFORE EXECUTION. 


€ 


5799 
5800 


026406 
026410 


000204 
104070 







8$? 


204 
ERROR 


70 


;FPS AFTER EXECUTION. 


C 


5801 
5802 


026412 
02641 4 


000401 
104100 








BR 

ERROR 


9$ 
100 


?ST 526 BAD SIGN 




5803 
5804 


026416 








9$: 








1 


5805 
5806 


026416 








JHODD 
HHH6S 


TEST WITH 


EXPONENT OF THE 


RESULT s 57 


t 


5807 
5808 


026416 
026420 


10441 3 
004737 


027422 






LPERR 

TOD 

JSR 


PC, p f MUDUSUd 


jSET UP THE LOOP ON ERROR ADDRESS. 




5809 
5810 


026424 
026432 


056200 
000001 


000000 


oooooo 


1$S 


.WORD 


56200,0,0, 1 


J AC 


g 


5811 
5812 


026434 
026442 


040340 
000000 


000000 


oooooo 


2$; 


.WORD 


40340,0,0,0 


?FSRC 


i 


5813 
5814 


026444 

0.2.6 4 5_2 


000000 
000000 


000000 


oooooo 


3$s 


• WORD 


0,0,0,0 


J FRACTIONAL RES, 



MAIN DEC 


-11-0FFPB 


•A 


POP 11/34 FPP 


DIAGNOSTIC PART 2 


NACm 27(1006) 


07-FEB-77 12506 PAGE 106 


DFFPBA.PU 01 


•N0V»76 


21J06 




T17 


NODD TEST 




5815 
5816 


026454 
026462 


056340 
000001 


OOOOOO 


OOOOOO 


4$ : 


, WORD 


56340,0,0, 1 




5817 
5818 


026464 
026472 


040000 
000000 


OOOOOO 


OOOOOO 


5$: 


. WORD 


40000,0,0,0 


?ERROR FRACTIONAL RES. 


5819 
5820 


026474 
026502 


056340 
000001 


OOOOOO 


OOOOOO 


6$; 


.WORD 


56340,0,0, 1 

_______ — 


JERROR INTEGER RES. 


5821 
5822 


026504 
026506 


00021 3 
000204 






7$; 


213 
204 




; FPS BEFORE EXECUTION, 
?FPS AFTER EXECUTION. 


5823 
5824 


026510 


104101 




___ 


8 $ ? 


ERROR 


101 


• CONST AN i BAD I NU 1 bbj 

JUR ST 525 TO 050 INTO 150 


5825 
5826 


026512 
026514 


000401 
104101 








BR 

ERROR 


9$ 
101 




5827 
5828 


026516 








9$5 








5829 
5830 


026516 








JMQDD 
HHH7 S 


TEST WITH 


EXPONENT OF THE 


RESULT ~ 56 


5831 
5832 


026516 
026520 


104413 
004737 


— 

027422 






LPERR 
JSP 


PC, ##MODDSUB 


?SET UP THE LOOP UN ERROR AOPR&oo. 


5833 
5834 


026524 
026532 


056000 
000001 


OOOOOO 


OOOOOO 


IS; 


.WORD 


56000,0,0, 1 


J AC 


5835 
5836 


026534 
026542 


040340 

oooooo 


OOOOOO 


OOOOOO 


2$; 


.WORD 


40340,0,0,0 


5 FSRC 


5837 
5838 


026544 
026552 


040100 
OOOOOO 


OOOOOO 


OOOOOO 


3$: 


, WORD 


40100,0,0,0 


SFRACTIQNAL RES. 


5839 
5840 


026554 
026562 


056140 
000001 


OOOOOO 


OOOOOO 


4$: 


.WORD 


56140,0,0, 1 


?INTEGER RES. 


5841 
5842 


026564 
026572 


oooooo 
oooooo 


OOOOOO 


oooooo 


5$; 


.WORD 


0,0,0,0 


? ERROR FRACTIONAL RES. 


5843 
5844 


026574 

026602 


0561 40 
000001 


OOOOOO 


oooooo 


6$; 


.WORD 


56140,0,0,1 


J ERROR INTEGER RES. 


5845 
5846 


026604 
026606 


00021 3 
000200 






7$s 


213 
200 


————— 


JFPS BEr ORE EXECUTION* 
?FPS AFTER EXECUTION. 


5847 
5848 


026610 


104102 






8$; 


ERROR 


102 


?8AD CONSTANT INOT 56) OR 
?ST 525 TO 150 INTO 050 


5849 
5850 


026612 
026614 


000401 
104102 








BR 

ERROR 


9$ 
102 




5851 
5852 


026616 








9 $ I 








5853 
5854 


026616 








JMODD 
HHH 8 * 


TEST WITH 


EXPONENT OF THE 


RESULT » 36 


5855 
5856 


026616 
026620 


104413 
004737 


0_27j$22 






LPERR 
JSR 


PC, $#MODDSUB 


J SET UP THE LOOP ON ERROR ADDRESS. 


5857 
5858 


026624 
026632 


05 1 1 77 
177777 


177777 


177777 


1$: 


.WORD 


51177,-1, -1,-1 


? AC 


5859 
5860 


026634 
026642 


040200 
OOOOOO 


OOOOOO 


oooooo 


2$S 


.WORD 


40200,0,0,0 


!FSRC 


5861 
5862 


026644 
026652 


040177 
OOOOOO 


177760 


oooooo 


3$; 


.WORD 


40177,-20,0,0 


* r RACTIONAL RES, 


5863 
5864 


026654 
026662 


051 177 
OOOOOO 


177777 


177760 


4$: 


.WORD 


51177,-1,-20,0 


• integer res. 


5865 
586b 


026664 
026672 


177777 
177777 


177777 


177777 


5$; 


.WORD 


-1,-1,-1,-1 


;ERROR FRACTIONAL RES. 


5867 
5868 


026674 
026702 


177777 
177777 


177777 


177777 


6$: 


.WORD 


-1,-1,-1,-1 


■ERROR INTEGER RES. 


5869 
5870 


026704 
026706 


000217 
000200 






7$: 


217 

200 




JFPS BEFORE EXECUTION, 
jFPS AFTER EXECUTION , 



1 


MAINDEC 


•1 i-DFFPB-A 


PDP 11 1/34 FPP 


DIAGNOSTIC PART 2 


MACY11 2711006) 


07-FEB*77 12806 PAGE 107 






DFFpBA.Pl 1 01 


-NOV-76 


21 :06 




T17 


MQDD TEST 






c 


5871 
5872 


026710 104070 
026712 000401 






8§: 


ERROR 
BR 


70 

M _ 








5873 
5J.71. 


026714 
026716 


104071 


— — — 




— — ■ — — — 
9$; 


ERROR 


71 






4 


5875 
587b 










:W0DD 


TEST WITH 


— — - - — 

EXPONENT OF THE 


RESULT = 30 




1 


5877 
$878 


026716 
026716 


104413 






HHH9S 


LPERR 




;SET UP THE LOOP ON ERROR ADDRESS. 






5879 
... 5fiM 


026720 
026724 


004737 
040200 


027422 
000000 


oooooo 


1$: 


JSR 
.WORD 


PC,£#NODDSUB 
40200, 0,0,0 


;AC 




t 


5881 
5882 


026732 
026734 


000000 
047577 


177777 




2$; 


.WORD 


47577,-1 


fFSRC 




1 


5883 
5884 


026740 
026744 


176000 
031600 


000001 
000000 


oooooo 


3$5 


.WORD 
.WORD 


176000, 1 
31600,0,0,0 


? FRACTIONAL RES. 






5885 
5886 


026752 
026754 


000000 
047577 


177777 




4$; 


.WORD 


47577,-1 


S INTEGER RES. 




4 


5887 
5888 


026760 
026764 


176000 
000000 


000000 
000000 


— 

oooooo 


5$: 


.WORD 
• WORD 


176000,0 
0,0,0,0 


; ERROR FRACTIONAL RES. 




4 


5889 
5890 


026772 
026774 


000000 
047577 


177777 


177777 


6$: 


.WORD 


47577,-1 , -1 , -1 


J ERROR INTEGER RES • 






5891 
589? 


027002 
027004 


177777 

000200 






7$! 


200 




JFPS BEFORE EXECUTION, 




4 


5893 
5894 


027006 
027010 


000200 
104103 


— — — 


__ — ™ 


8$; 


200 
ERROR 


103 


?FPS AFTER EXECUTION • 

? (NORMALIZE) ST 532 TO 122 




4 


5895 
5896 


027012 


000401 








BR 


9$ 


JINTO NORM. 






5897 
5898 


027014 


104104 








ERROR 104 


;AC V 1 <5!; Xl4 

•OR ST 733 TO 156 INTO 157. 




4 


5899 
§900 


027016 








9$; 










4 


5901 
5902 


027016 








* HODD 
HHH10S 


TEST WITH 


EXPONENT OF THE 


RESULT s 31 






5903 

5904 


027016 
027020 


104413 
004737 


027422 






LPERR 
JSR 


PC , ##MODDSUB 


jSET UP THE LOOP ON ERROR ADDRESS. 




4 


5905 
5906 


027024 
027030 


047777 
177000 


177777 
000000 




Us 


.WORD 
.WORD 


47777, -1 
177000,0 


* AC 




4 


5907 
5908 


027034 
027042 


040200 
000000 


000000 


oooooo 


2$: 


* WORD 


40200,0,0,0 


JFSRC 






5909 
5910 


027044 
027052 


000000 
000000 


000000 


oooooo 


3$: 


♦ WORD 


0,0,0,0 


JFRACTIONAL RES . 




4 


5911 
5912 


027054 
027060 


047777 
17 700.0 


177777 

oooooo 


— __ 


4$: 


.WORD 
.WORD 


47777,-1 
177000,0 


; INTEGER RES. 




4 


591 3 
5914 


027064 
.027072 


000000 
JLOQ<?00„ 


000000 


177000 


5 $ s 


.WORD 


0,0,177000,0 


; ERROR FRACTIONAL RES f 






5915 
5916 


027074 
027102 . 


177777 
177777 


1 77777 


1 77777 


6$: 


.WORD 


-1 1 -1,-1,-1 


? ERROR INTEGER RES. 




i 


5917 
5918 


027104 
027106 


000213 
000204 





_ 


7$: 


213 

2J>4 




jFPS BEFORE EXECUTION. 
;FPS AFTER EXECUTION. 




< 


5919 
5920 


027110 
027112 


104105 
000401 






8$; 


ERROR 
BR 


105 
9$ 


? (BUT FD) STORE X10 






5921 
5922 


027114 
027116 


104071 







9$; 


ERROR 


71 






i 


5923 
SS2A-. 










;mopd 


TEST WITH 


J££EflN6lU_QF' THE 


RESULT » 




i 


5925 
5926 


02711b 
027H6 


104413 






HHH 1 1 S 


LPERR 




;SET UP THE LOOP ON ERROR ADDRESS. 





MAlNDfcC 


-i i-dffpb 


•A 


PDP 11/34 FPP 


DIAGNOSTIC PART 2 


MAC Hi 27( 1006) 


07-FEB-77 12:06 PAGE 108 




DFFPBA.Pll 01 


-NQV-76 


21S06 




T17 


MOOD TEST 






5927 

5928 


027120 
027124 


004737 

040200 


027422 
000000 


000000 


— — -— — — — — 
1 s s 


JSP 
* WORD 


PC , i#MODDSUB 
40200, Of 0,0 


* AC 




5929 
5930 


027132 
027134 


000000 
040177 


072727 




2$ S 


♦ WORD 


40177, 72727 


JFSRC 




5931 027140 

5932 027144 


127272 
040177 


072727 
072727 




3$ : 


♦ WORD 
.WORD 


127272,72727 
40177, 72727 


; FRACTIONAL RES . 




5933 
5934 


027150 
027154 


127272 
000000 


072727 
000000 


000000 


4$ ; 


♦ WORD 

• WORD 


1 27272f 72727 
O f Of Of 


? INTEGER RES, 




5935 
5936 


027162 
027i64 


000000 
177777 


17 7777 


177777 


5$ : 


• WORD 


-1,-1,-1,-1 


? ERROR FRACTIONAL RES, 




5937 
5938 


027172 
027174 


177777 
000000 


000000 


177777 


6$ : 


• WORD 


Or 0,-1,-1 


5 ERROR INTEGER RES. 




5939 
5940 


027202 
027204 


177777 
000200 






7$: 


200 




JFPS BEFORE EXECUTION. 




5941 
5942 


027206 
027210 


000200 
104070 




— — 


8$ : 


200 
ERROR 


70 


jF'PS AFTER EXECUTION. 




5943 
5944 


027212 
027214 


000401 
104106 








BR 

ERROR 


9$ 
106 


;ST 246 TO 126 INTO 127 (BUT FD) 




5945 
5946 


027216 






— — — — 


9$ : 










5947 

5948 


027216 






~ 


?HOOD 
HHH1 2 S 


TEST WITH 


EXPONENT OF THE 


RESULT s -115 




5949 
5950 


027216 
027220 


10441 3 
004737 


02742? 






LPERR 
JSR 


PC , §#M0DDSU8 


?5ET UP THE LOOP ON ERROR ADDREbo. 




5951 

5952 


027224 
027230 


003377 
177777 


177777 

052525 




1$S 


.WORD 
♦ WORD 


3377,-1 

-1 ,52525 


•AC 




5953 
5954 


027234 
027242 


040200 
000000 


000000 


oooooo 


2$: 


♦ WORD 


40200,0,0,0 


?FSRC 




5955 
5956 


027244 
027250 


003377 
177777 


177777 
052525 




3$: 


♦ WORD 

♦ WORD 


3377,-1 
-1 , 52525 


•FRACTIONAL RES. 




5957 
5958 


027254 
027262 


000000 
000000 


000000 


oooooo 


4$: 


t WORD 


0,0,0,0 


S INTEGER RES. 




5959 
5960 


027264 
027272 


177777 
177777 


17777? 


177777 


5$: 


♦ WORD 


-1,-1,-1,-1 


; ERROR FRACTIONAL RES. 




5961 
5962 


027274 
027302 


000000 
177777 


000000 


177777 


6$: 


, WORD 


0,0,-1,-1 


JERRQR INTEGER RES. 




5963 
5964 


027304 
027306 


000200 
000200 


— — — — — 


— ______ 


7s; 


200 
200 




* r PS BErORE EXECUTION. 
jFPS AFTER EXECUTION . 




5965 
5966 


027310 
027312 


104070 
000401 







8$: 


ERROR 
SR 


70 
9$ 






5967 
5968 


027314 
027316 


104107 






9$! 


ERROR 


107 


?ST 446 TO 126 INTO 127 (BUT FD) 




5969 
5970 










; MODD 


TEST WITH 


— — — — . — 

EXPONENT Of THE 


RESULT s -63, IN ROUND MODE. 




5971 
5972 


027316 
027316 


10441 3 


_ 




HHH13: 


LPERR 




?SET UP THE LOOP ON ERROR ADDRESS. 




5973 
5974 


027320 
027324 


004737 
040300 


027422 
000000 


oooooo 




JSR 
tiC OR D 


PC,§#HODDSUB 
40300^^0,0 


!AC 




5975 
5976 


027332 
027334 


000000 
020200 


000000 


oooooo 


2$: 


• WORD 


20200, 0,0,1 


JFSRC 




5977 
5978 


027342 
027344 


000001 
020300 


000000 


oooooo 


3$ : 


♦ WORD 


20300,0,0,2 


? FRACTIONAL RES. 




5979 
5980 


027352 
027 354 


000002 
000000 


000000 


_o.ftpa.oQ_ 


4$: 


t WORD _ 


0,0,0,0 


J INTEGER RES. 




5981 

5982 


027362 
027364 


000000 
000000 


000000 


177777 


5$ ; 


• WORD 


0,0,-1,-1 


J ERROR FRACTIONAL RES, 





MAINDEC~U»PFfr PB-A 



DFFPBA.Pll 



01-N0V-76 21S06 
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T17 M0~DD TEST 



5983 

59M. 

5985 

5986 



5987 
5988 



027372 
027374 
027402 
027404 
027406 
J2L22J. 



177777 
177777 
177777 
000200 



177777 177777 6$; 



.WORD 



it-it -A 



t .-_■■* f.,_z:-*-j!-- * -. , 



ERROR INTEGER RES 



7$ 



200 



;FPS BEFORE EXECUTION, 



5989 
599$ 



027412 
027414 



000200 

Milk. 
000401 
104071 



8$; 



200 
ERROR 



110 



jFPS AFTER EXECUTION 
JST 127 INTO RND/TR 



8R 

ERROR 



9$ 
71 



5991 027416 000137 030020 



9$? 



JMP 



p# HBHDONE 



?GQ TO THE NEXT TEST. 



5993 i 

5994 J 


jTHIS SUBROUTINE, MQDDSUB, IS CALLED TO SETUP THE 

• OPERANDS* EXECUTE THE MODD INSTRUCTION AND CHECK THE RESULTS. 


5995 ! 

5996 1 


;IT IS CALLED THUS S 


5997 S 

5998 1 


ACARG; .WORD X,X,X,X ?AC OPERAND 
\ FSRCARG; .WORD X,X,X,X ?FSRC OPERAND 


5999 j 

6000 ! 


FRESJ .WORD X,X,X,X ? FRACTIONAL RESULT 
INTRES: . WORD X,X,X,X ; INTEGER RESULT 


6001 ! 
6002 


ERFRES5 .WORD X,X,X,X ? ERROR FRACTION RESULT 
\ ERINTRES? .WORD X,X,X,X j ERROR INTEGER RESULT 


6003 I 

6004 j 


r FPSB: .WORD X jFPS BEFORE EXECUTION 
\ FPSA! . WORD X ?FPS AFTER EXECUTION 


6005 ! 
6G<*6 


• ERR1? ERROR X ; FRACTION ERROR 
r BR CONT 


6007 

6008 , 


f ERR2 5 ERROR X j INTEGER ERROR 
i CONT: ? RETURN ADDRESS 


6009 J 

6010 ! 


! THE OPERANDS ARE SET UP (USING ACO FOR THE AC ARGUHENT). THE MQDD 


60H i 
6A1? ! 


• INSTRUCTION IS EXECUTED. THEN THE RESULTS ARE RETRIEVED. 

• THE FRACTION PART OF THE RESULT IS COMPARED WITH FRES. IF THIS IS CORRECT 


6013 J 

6014 ! 


> THEN THE INTEGER PART IS COMPARED WITH INTRES. IF BOTH OF THESE ARE CORRECT 
{THEN THE FPS IS COMPARED WITH FPSA. AFTER EXECUTION IF NO ERRORS OCCURRED 



t 



6015 
6Q16 



6017 



j THEN MODDSUB WILL RETURN TO CONT . IF THE FPS WAS INCORRECT 

;IT IS REPORTED H ERE. IF THE F RACTION IS INCORRECT IT IS COMPARED WITH 



jTHE ANTICIPATED BAD FRACTION, ERF RES. IF THIS DOESN'T MATCH 



i 



6019 








^FAILURE MATCHES THE TRUE RESULT THEN MODDSUB PASSES CONTROL TO THE 




6020 








.•ERROR CALL AT 


ERR1. LIKEWISE 


IF THE INTEGER PART OF THE RESULT IS 


€ 


6021 








j NOT CORRECT THEN IT IS COMPARED WITH THE ANTICIPATED INTEGER 




6022 








! FAILURE. IF THIS DOEN * T MATCH 


THEN THE ERROR IS REPORTED HERE. 




6023 








jIF A MATCH IS 


MADE HOWEVER, MODDSUB WILL RETURN CONTROL TO THE ERROR 




6Q?4 








JCALL AT ERR2. 








6025 
6026 


027422 


012601 




MODDSUB ; 


MOV (SP)+, 


Rl t GET A POINTER TO THE ARGUMENTS 


i 


6027 


027424 


012700 


000200 


MOV 


#200, RO 


f SET FD MODE. 




6028 


027430 


170100 




LDFPS 


RO 






6029 


027432 


010100 




MOV 


R1,R0 


JSET UP ACO 


1 


60?0 


027434 


172410 




LDD 


(RO).ACO 






6031 


027436 


012700 


025702 


MOV 


#M0DP1 ,R0 


;PUT A BACKROUND PATTERN INTO AC 1 . 




6Q32 


027442 


172510 




LDD 


(RO), AC1 




i 


6033 


027444 


016100 


000060 


MOV 


60(Rl),R0 


;SET UP THE FPS. 




6034 


027450 


170100 




LDFPS 


RO 






6035 


027452 


012737 


027466 001236 


MOV 


*1$,§#$TMP2 




< 






-J>i01Q0 , 




MOV 


Hlf RO 


tCOMPUTE THE ADDRESS OF THE FSRC. 




6037 


027462 


062700 


000010 


ADD 


#10, RO 






. 6038 
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* — 


£L S\ ^ r*i 

6039 


027466 


4 *f 4 A 4 A 






1 § • 


unnn 


f DA t SfA 


i CiAC'vU > c< iriEi idol inoinuti luw • 


604J).„ 




















60*1 


027470 


1 /U204 


_ 







o JH r fa 




t rjrT THF FDQ 




6042 


A A *** Jl A 

027472 


A * ^1 A A 

01 2700 


A A A A; A A 

000200 






MOV 


it A a rs A 

# 200 f RO 


• c c t cn urine 
!5bl ru HUUt, 


- . 

1 


60*3 


027476 


4 1 A4 A A 

X 701Q0 










D A 






6044 


027500 


012700 


030000 






MOV 


U 4i r\ r\ tT^ a da 

fHQDDTO* R0 


" bEl * He* r KAl I I UN AJU KfcoUyl t 




6045 


027504 


4 1 A A 4 A 










a P A t D A 1 




4 

f 


6046 


0/7506 


A 4 *I A A. 

01 2700 


A 1 A A 4 A 

030010 






mo V 


f MODDTi # RO 


• V»b 1 1 H t i N 1 tVatH KCOUL * * 




6047 


A »1 "7 SL 1 O 

04 7 512 


4 7 A 1 4 A 
1 / 9 1 1 








O J U 


Aw. 1# 1 tw J 






6048 


















1 


6049 


02751 4 


A 4 A 4 AO 

010102 








u n u 


D 1 DO 

H I # K2 


• c a VF TMF niTi TN PACE* nir FP PflR 




6050 


027516 


010237 


A A 41 A Ai A 

001 240 




— — — — - 


MOV 


P. 2* ^# $TMP3 






6051 


A !*Y *V f A A 

027522 


062702 


000010 


, — — — 




ADD 


# 4 A D ^ 

f 1 Of R2 




1 


6052 


027526 


010237 


001242 






MOV 


R2# p#$TMP4 






6053 


027532 


062702 


A A /"V A 4 A 

000010 






ADD 


* 1 r R2 






6054 


027536 


010237 


001244 






MOV 


R2 # §# $TMP5 




1. 


6055 


027542 


062 702 


A A A A 4 A 

000010 








# 4 A DO 

f 1 f H2 






6056 


027546 


010237 


001246 






MOV 


R2# @#$TMP6 






6057 


02 7332 


A 4 Till 

012/37 


A "I A A A A 

030000 


A A 4. 1 CL A 

001250 




4J ft \I 


f MOMIJ1 0#(P#51Mr# 




i 


6058 


027560 


012737 


A ^ A A 4 A 

030010 


001252 




wov 




i 




6059 


02 /566 


A 4 & 4 1 "J 

01613/ 


AAAA4 ^ 

0000"2 


A A 4 1 £L *-> 

00 1 25© 




*i i-| u 








6060 


a e: *t j4 

027574 


A. 4 A. A 3 "1 

01043 7 


001 25 4 






MOV 


O A *j it ^> m u n 4 4 




1 


6061 




















6062 


027500 


012702 


A ^ A A A A 

030000 






MOV 


# M0DD1 ^ R2 


• fUrfV t U IT PDiPTTflklll DF CliT T 


1 


t /\ i 
oOoi 


02 /504 


1 1 3 








iiftV 






6064 


027606 


*V jr A T «-i "V 

062703 


000020 






ADD 


f 20 # R3 


1 




6065 


02 7612 


A 4 1 1 A C 

012 705 


A A A A A A 

000004 






V 








6066 


027616 


022223 






2$ ; 


CMP 


(R2) + # (R3 j + 




1: 


6067 


02/620 


A A 1 A O A 

001 020 










1 A e 


• RR A NTH T F T NrflRRFPT i 




6068 


027522 


077503 








& if\ CS 

SOB 


R5 ,2$ 




4f 


6069 


















6070 


027624 


A 4 *5 T A 1 

012 702 


A "3 A A 4 A 

030010 






MOV 


f M0DDT 1 r R2 


* CHECK IHE INTEGER REoULT» 




A ft 7 1 


(\01f* ^ A 
U « iPJv 


A 1 A 1 A J 










D 1 n 1 

t< A # K ^ 






6072 


A T *i ^ ^\ 

027532 


A £ ^ "I A 1 

062 703 


A. A A A *% A 

000030 






ADD 


#30# R3 




1 


6073 


027636 


012 705 


A A A A A if 

000004 






MOV 








6074 


A A *• A A 

027642 


022223 






3s : 


CMP 


( R2)+# (R3)+ 






50 / 5 


A J "7 £. A A 
02 * V s * 4 * 


A A 4 A 1 *h 

00 * U20 










135 


• rd&upu tf t wrnBBFrT 


f 


6076 


027646 


07 7503 








SOp 


R5 1 3$ 


1 




607/ 




















6078 


















1 


t>0 * 9 


02 752>0 


A 1 ^ 4 A A 

026104 


A A A A £. 1 

000062 






CMP 


62(Rl) f R4 


• fUFflf THF FOC 1 




6080 


027654 


A A 4 i V A ^ 

001 042 








BNE 


20$ 


■ QD ili^U tEr Tll/TIDDC'^T 

JoRANC" Ar iNCUKKkCl. 


1 


60S I 


















6082 


A A *T .£1 C £i 

027656 


A A A 4 4 

0001 61 


A A A A *f ^ 

000072 




9$S 


JMP 


72(Rl) 


fRETURNp 




608 3 




















6084 










; FRACTIONAL ERROR. 




1 


6085 


02 /D02 


A 4 O 7 A "> 

012 702 


A 1 A A A A 

030000 




10$: 


MQV 


|M0DDT0,R2 






6086 


027666 


010103 








MOV 


R1*R3 






5Q8 / 


02/5/0 


Oo 2 f QS 


A A A A Vl A 

000040 






ADD 


#40, R3 




1 


6088 


02 757$ 


A 4 It AC 

012705 


A A A A A /I 

000004 






MOV 


#4,R5 






6089 


027700 


022223 






50$: 


CMP 


(R2)+, (R3)t 






6090 


027702 


001005 








6NE 


11$ 


; BRANCH IF NOT ANTICIPATED, 




6091 


027704 


077503 








SOB 


R5,50$ 






6092 


027706 


010102 








MOV 


Rl r R2 


j THE ERROR WAS ANTICIPATED SO 




6093 


027710 


062702 


000064 






ADD 


#64, R2 


; RETURN TO THE ERROR REPORT AT THE 


€ 


6094 
















JCALLING ROUTINE. 



1 


MAINDEC 


*U»DFFPe 


• A 


POP 11/34 FPP 


DIAGNOSTIC PART 2 


MAC Y 1 1 27(1006) 07-FEB-77 12:06 PAGE 111 








dffpba.pii oi 


-N0V»76 


21,06 




T17 MQDD TEST 




1 




6095 
6096 


027714 


000112 


-— 




JMP 


CR2) 




i 




6097 
6099 


_____ 
027716 


104070 







lis* 

12$; ERROR 


S THE ERROR WAS NOT ANTICIPATED SO 
70 j REPORT THE I NCORRECT FRACTION HERE. 






f 


6099 
6IPQ 


027720 


000756 






8R 


9$ 

_ , __™_™____________ — • ■ ■ — — 




< 


1 


6101 
61 02 


027722 


012702 


030010 




; INTEGER ERROR. 
15$: MOV 


#MODDTt i R2 ?WAS THE INTEGER ERROR ANTICIPATED? 








6103 
6104 


027726 
027730 


010103 
062703 


000050 




MOV 
ADD 


R1-R3 
#50, R3 






i 


6105 
6106 


027734 
027740 


012705 
022223 


000004 




MOV 

60S? CMP 


f 4, R5 

CR2)+f (R3)+ 




< 


< 


6107 
6108 


027742 
027744 


001005 
077503 






BNE 
SOB 


17$ ^BRANCH IF NOT ANTICIPATED. 
R5,60$ 




I 




6109 
6110 


027746 
027750 


010102 
062702 


000070 




my 

ADD 


R1,R2 ; THE ERROR WAS ANTIC IAPTED SO RETURN 
#70, R2 ?T0 THE ERROR REPORT IN THE CALLING 






4 


6111 
6|U 


027754 


000H2 






JMP 


^ROUTINE, 

(R2) 




I 


c 


6113 
6114 


027756 








16$: 


j THE ERROR WAS NOT ANTICIPATED SO REPORT 




f 




6115 
6H6 


027756 
027760 


104071 
000736 






17$: ERROR 

SR 


71 ; THE INTEGER FAILURE HERE. 
9$ 






t 


6117 
6118 










I FPS INCORRECT. 






i 


i 


6119 
6120 


027762 
027766 


010437 
016137 


001254 
000062 


001256 


20$: mqv 
MOV 


R4,§#$TMPtl J REPORT INCORRECT FPS. 
62(R1),§*$TMP12 




i 




6121 
6122 


027774 
027776 


104072 
000727 






21$: ERROR 
BR 


72 

9$ 






i 


6123 
6124 


030000 


000000 




OOOOOO 


OOOOOO 


MODDTO; .WORD 


0,0, o f o 




( 


i 


6125 
6126 


030006 


000000 












I 




6127 
6128 


030010 
030016 


000000 

oooooo 


OOOOOO 


oooooo 


MQDDTl : .WORD 


0,0,0,0 






f 


6129 
6130 


030020 









, , _____ __ 

HHHDONE: 






4 


t 


6131 
6132 


030020 


104412 






RSETUP 


jGO INITIALIZE THE FPS AND STACK? AND 
;SEE IF THE USER HAS EXPRESSED 




4 




6133 
6U4 












?THE DESIRE TO CHANGE THE SOFTWARE 

5 VIRTUAL CONSOLE SWITCH REGISTER (HAS 






I 


6135 
6136 












If THE USER TYPED CONTROL G?). 




1 


i 


6137 
6138 
















4 




6139 
6140 










• • *****#*#**#*#*####*#**####* ##**^ 






i- 


6141 
6142 










;*TEST 20 
:# 


UNDERVOVER FLOW, USING MODF WITH TRAPS DISABLED, TEST 




4 


< 


6143 
6144 










;#THIS IS A TEST OF THE MODE OVERFLOW AND UNDERFLOW CONDITIONS. IT MAKES 
:#USE OF A SUBROUTINE TO SETUP THE OPERANDS - EXECUTE THE MOOF INSTRUCTION 




4 




6145 
6146 










;*AND CHECK THE 
• * 


RESULTS. TRAPS ARE DISABLED DURING THIS TEST. 






4 


6147 
6148 


Q30022 


000004 






TST20 : SCOPE 




4 


4 


6149 

6150 










; UNDERFLOW TEST, 


WITH EXPONENT OF THE RESULT * -129, FIU = 1, FID = 1 




4 



1 

i 





MAINDEC 


-l 1-DFFP6 


•A 


POP 1 1/34 


FPP DIAGNOSTI 


C PART 


2 MACHl 27(1006) 07-FEB-77 12:06 PAGE 112 


i 
i 


If 


DFFP8A.PU 01 


-NQV-76 


21 5 06 


T20 


UNDER\OVER FLOW, USING MQDF WITH TRAPS DISABLED, TEST 


E 


1 ,„ 


6151 

6152 


030024 
030024 


104413 




MMM1 : 


LPERR 




fSET UP THE LOUP UN ERROR AUUKtoo, 


4 




6153 
6154 


030026 
030032 


004767 

020123 


000320 
045676 


1$: 


JSR 
. WORD 


PC, MODFOV 
20123, 45676 


y AC 




g 


6155 
6156 


030036 
030042 


020200 
000123 


oooooo 

045676 


2$ : 

3$; 


.WORD 
• WORD 


20200,0 
123, 45676 


jFSRC 

?FRACTI0NAL RES # 


4 


4 


6157 
6158 


030046 

A "k A A f A 

030052 


oooooo 

177777 


oooooo 

177777 


4$ ; 
5$: 


.WORD 
. WORD 


0,0 
•1,-1 


; INTEGER RES, 

Jt,RROR r RAC 1 ION AL RES, 


4 




6159 
6160 


030056 
030062 


mm 

042000 


177777 


6$ % 
7$s 


.WORD 
42000 


-1,-1 


? ERROR INTEGER RES. 
;FPS BEFORE EXECUTION. 




4 ' " 
1 


6161 
&162 


030064 
030066 


1 42004 
000012 






142004 
12 




?FPS AFTER EXECUTION . 
? FEC 


gr 
1 


4 


6163 
6164 


030070 
030072 


104170 
000401 




8$ 5 


ERROR 
BR 


170 
9$ 


;FEC INCORRECT, UNDERFLOW. 


c 




6165 
6166 


030074 
030076 


104171 




9$: 


ERROR 


171 


jAC V 1 (2,3) <= ZERO, ST 126, 




J 

I 


6167 
6168 








S UNDERFLOW EXP 


OF RESULT = • 


193, F1U - 0, FID = 1 


C 


1 


6169 
6170 


030076 
030076 


104413 






LPERR 




? SE I UP fHh. LUUP UN bKRUR ADuREoo. 


1 




6171 

6172 


030100 

A *2 A 4 A A 

030104 


004737 
010200 


030352 

oooooo 


i$s 


JSR 
, WORD 


PC,£#HGDF0V 


f AC 




1 


6173 
6174 


030110 
03011 4 


A 41 /"V A A A 

010000 

oooooo 


oooooo 
oooooo 


2$; 
3$; 


.WORD 
.WORD 


10000,0 
0,0 


?FSRC 

• c* n * * t n M * f ne'e 

SrRACTIONAL RES. 


f 


1 


6175 
6176 


030120 

A 3 A 4 ^ A 

30124 


A A A A A A 

oooooo 

177777 


A A A >*v A A 

oooooo 

177777 


4$; 

5$: 


.WORD 
• WORD 


0,0 
-1,-1 


i INTEGER RES. 

J C.RKUK rHAClIUNAL K&o. 


c 




6177 
6178 


030130 
030134 


4 m *f am mm <m 

mm 

005013 


177777 


6$: 
7$; 


• WORD 
5013 


m \ f m 1 


; ERROR INTEGER RES. 
JFPS BErORE EXECUTION, 




m 
I 


6179 
61 80 


030136 
030140 


005004 
000012 






5004 
12 




?FPS AFTER EXECUTION. 
?FEC 


c 


€ 


6181 
6182 


030142 
030144 


A A A. *"\ 

000240 
000401 




8$: 


NOP 
8R 


A A 

9$ 




c 




6183 
6184 


030146 

A ~*i A 4 a 

030150 


104171 




9$: 


ERROR 


171 






1 


6185 
6186 








JOVERFLO* TEST 


WITH EXPONENT 


OF THE RESULT s l^o, r IV 5 1, r ID - 1 


1 


1 


6187 
6188 


030150 
030150 


104413 




MMM3? 


LPERR 




J SET UP 1HE LUUP UN C.KKUK AUUHtoo, 


1 




6189 
6190 


030152 
030156 


004737 
060052 


030352 
125252 


1$: 


JSR 
• WORD 


PC,»#MODFOV 
60052 , 125252 


; AC 




M 
1 


6191 
6192 


030162 
0301 66 


060200 

oooooo 


A A A A A 

oooooo 
oooooo 


2$s 
3s s 


• WORD 

• WORD 


60200,0 

A A 

0,0 


JFSRC 

• c q * r» t i n tit I ore 
JrRACTIUNAL Kfc.o, 


4 


1 


6193 
6194 


0301?2 
030176 


A A A A f* 

000052 

oooooo 


125252 

oooooo 


4$: 
5$: 


.WORD 
• WORD 


52,125252 

A A 

0,0 


j INTEGER RES. 

•ERRUR FRACTIONAL RES, 


4 




6195 


030202 
030206 


oooooo 

041000 


oooooo 


6s : 
7$: 


• WORD 
41000 


0,0 


? ERROR INTEGER RES, 
jrPS BEFORE EXECUTION. 




1 


6197 
6198 


030210 
030212 


141006 
000010 






141006 

to 




?FPS AFTER EXECUTION, 
* F EC 


4 


4 


6199 
6200 


030214 
030216 


104172 
000401 




8$; 


ERROR 
8R 


172 
9$ 


I BAD FEC ON OVERFLOW , 


4 




6201 
6202 


030220 


1041 73 






ERROR 


173 


jST 520 TO STORE ZERO TWICE 
J1NT0 162 




i. 


6203 
6204 


030222 






9$; 








1 


1 


6205 
J&2M_ 


Q30222__ 






♦•OVERFLOW TEST 
MMM4: 


WITH EXPONENT 


OF THE RESULT s 130, FIV = 0, FID = 1 
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£ f\ Ml 

6207 


030222 


10441 3 






r n c n n 




iSfcl Or itlt LUUr UN tHHUH AUUKboD. 


6208 


A. ~*4 A ""^ *"fc A 

JLL0/2I_ 


0047 37 


M&152 




JSR 


PC # @# M0DF0V 




b/09 


A a A O a A 

030/30 


Act. A a AC 

000343 


00 /f>34 


15 5 


t nUKIJ 


£.AaAK £1£,e;a . 


' Aw 


bIIJQL. 


0302 34 


060200 


fk /\ A *fk 

oooooo 


/SI 


t.f i™i r» rv 

t WORD 


t A 1 A A A i 

O0200|0 1 


i IT r n r 1 

? p SRC. 


6/11 


030240 


000000 


g\ j-\ g\ A A JV 

oooooo 


3$ : 


. WURD 


A A - 

Of ' 


t r H Av». 1 lUN AL Hbib, 


621 2 


030244 


000000 


oooooo 


i a • 

4$ 5 


. wURD 


f j 


1 INTEGER RES, 


0213 


030/30 


A A A A A A 

000000 


A A A A A A 

oooooo 


5$ : 


* WURD 


A A < 

0*0 




6/14 


A "J A ■ J C ^ 
30 / 3 4 


000343 


Atli.C/1 

00 /o54 


0$ • 


• WORD 


345,67654 \ 


ERROR INTEGER RES, 


6215 


030260 


006011 




7$? 


6011 




•FPS BEFORE EXECUTION, 


0210 


a 1 A '1 C *y 

30 /02 


oooooo 






0000 




• EPS AFTER EXECUTION. 


0/17 


030/04 


A A A A * A 

0000 1 






10 




JFEC 


0218 


A a A 1 C £. 

030*60 


A A A *a 4 A 

000/40 




8$5 


PI0P 






(.4 4(1 


A "J A i "7 A 

030/ f 


A A A A A 4 
V 4 I 






BR 


9$ 




6220 


030272 


104174 







ERROR 


174 ?ST 520 TO 162 INTO STORE ZERO TWICE, 


C A '"i 4 

6221 
6222 


A "5 A 1 "7 >i 

0302/4 






9$? 








0/23 








^OVERFLOW TEST 


WITH EXPONENT OF THE RESULT = 128, RESULT NEGATIVE 


£. *i *i 

©224 




-— — — 




J AND 


FIV = 1, 


FID = 1 




6225 


A a A 1 *T il 

030/ /4 






MMM5S 








02/o 


A a A 1 *? A 

030/ /4 


* a A a * a 
104413 






LPERR 


?SET UP THE LOOP ON ERROR ADDRESS, 


622 / 


040/ / 


A A A "1 1 1 

004 / 3 / 


A ^ A ^ C -*> 

030352 




JSR 


PC,@#M0DF0V 




0228 


a a A 1 A o 
03030/ 


4 A 1 C O 

1 00/3/ 


1 /323/ 


1$; 


.WORD 


160252,125252 ?AC 


/ *y 


v 3 v jUO 


Afc. AA AA 

000000 


A A A A A A 

oooooo 


2$: 


.WORD 


60000,0 J 


IFSRC 


02 30 


a a a a 1 a 
030312 


A A A A A A 

oooooo 


AAAAAA 

oooooo 


3$; 


# WORD 


0,0 1 


*, FRACTIONAL RES, 


0/3 1 


a a a i i 
0404 1 


4 AAACO 

1 0000/ 


4 *5«i ac a 
I /3 /o / 


4$: 


.WORD 


100052,125252 ! 


•INTEGER RES, 


0/3/ 


a a ft a o a 


A A A A A A 

oooooo 


/\ *f\ J 8 ! /i ft f\ 

oooooo 


5$s 


.WORD 


0,0 j 


• ERROR FRACTIONAL RES, 




U J U 4 * 


uoooo/ 


I /3/3 / 


6$: 


.WORD 


52,125252 1 


• ERROR INTEGER RES, 


til A 

O / 4 $ 


a a a a ao 


A A 1 AAA 
U % * U V 




7$: 


41000 




•FPS BEFORE EXECUTION, 


6235 


030334 


141006 






141006 




•FPS AFTER EXECUTION. 


6236 


030336 


000010 






10 




' FEC 


6237 


030340 


104172 




8$: 


ERROR 


172 




6238 


030342 


000401 






BR 


9$ 




6239 


030344 


104175 






ERROR 


175 ;ST 517, BAD SIGN. 


6240 


030346 


000137 


030746 


9$s 


J MP 


@#MMMD0NE ?G0 TO THE NEXT TEST „ 



6241 

6242 ?THIS SUBROUTINE, MQDFOV, IS CALLED TO SETUP THE 



6243 i 

6244 ; 


^OPERANDS, EXECUTE THE MODF INSTRUCTION AND CHECK THE RESULTS, 
;IT IS CALLED THUS: 


6245 ! 

6246 : 


s acarG: ,word x,x j 


AC OPERAND 


6247 j 

6248 1 


FSRCARGS.WORD X,X j 
1 FRES? .WORD X,X j 


•FSRC OPERAND 
•FRACTIONAL RESULT 


6249 j 

6250 J 


l INTRES: . WORD X,X J 
I ERFRES: . WORD X,X \ 


•INTEGER RESULT 

• ERROR FRACTION RESULT 


6251 j 
625? j 


i ERINTRES: .WORD X.X J 
f FPSB: . WORD X ; 


•ERROR INTEGER RESULT 
IFPS BEFORE EXECUTION 


6253 ! 
6254 


f FPSA; . WORD X i 
i FEC: .WORD X j 


?FPS AFTER EXECUTION 
•FEC 


6255 
6256 


? ERR IS ERROR X j 
? BR CONT 


;FEC ERROR 


6257 ! 

6258 : 


i ERR2 ! ERROR X ; INTEGER ERROR 
! CONTs ; RETURN ADDRESS 


6259 ; 


- 

1 THE OPERANDS ARE SET UP (USING ACO FOR THE AC ARGUMENT) • THE MQDF 


6261 j 
656o . 


•INSTRUCTION IS EXECUTED. THEN THE RESULTS ARE RETRIEVED. 

•THE FRACTION PART OF THE RESULT IS COMPARED WITH FRES. IF THIS IS CORRECT 





MAINPEC 


»M*DFFPB 


*A 


POP H/34 FPP 


DIAGNOSTIC PART 


2 MAC i 1 1 27(1006) 


07-FEB-77 12506 PAGE 114 




lip - 

iu 


DFFPBA *P1 J 01 


*NQV-76 


21506 




T20 


UNDERNQVER FLOW, USING MODF WITH TRAPS DISABLED, TEST 


s 

L 


f 


6263 

6264 










; THEN 
? THEN 


THE INTEGER PART IS COMPARED WITH INTRES, IF BOTH OF THESE ARE CORRECT 
THE FPS IS COMPARED WITH FpSA. AFTER EXECUTION IF NO ERRORS OCCURRED 


< 




6265 
6266 










; THEN MODFOV WILL RETURN TO CQNT, IF THE FPS WAS INCORRECT 

;IT IS REPORTED HERE. IF THE FRACTION IS INCORRECT IT IS COMPARED WITH 




M ~" 


6267 
6268 










? THE 
;THE 


ANTICIPATED BAD FRACTION, ERFRES, IF THIS DOESN'T MATCH 

TRUE RESULT THEN THE ERROR IS REPORTED HERE, IF THE ANTICIPATED 


m 
% 


1 


6269 
6270 








— — — • 


^FAILURE MATCHES THE TRUE RESULT 
j ERROR CALL AT ERR1 • LIKEWISE IF 


THEN MODFOV PASSES CONTROL TO THE 
THE INTEGER PART OF THE RESULT IS 


1 




6271 
6272 










; NOT CORRECT THEN IT IS COMPARED WITH THE ANTICIPATED INTEGER 
; FAILURE. If THIS POEN * T MATCH THEN THE ERROR IS REPORTED HERE, 




1 


6273 
6274 










;IF A 
JCALL 


MATCH IS 
AT ERR2, 


MADE HOWEVER, MODFOV WILL RETURN CONTROL TO THE ERROR 


M 
1 


C 


6275 
6276 


030352 


012601 






MODFOV S MOV 


(SP)+,R1 


JGET A POINTER TO THE ARGUMENTS 


f 




6277 
6278 


030354 
030360 


012700 
170100 


000200 






MOV 
LDFPS 


#200, RO 

RO 


JSET FD MODE, 




1 


6279 
6280 


030362 
030364 


010100 
172410 








MOV 
LDD 


R1,R0 
(RO) « ACO 


JSET UP ACO 


f 


c 


6281 
6282 


030366 
030372 


012700 
172510 


025702 






MOV 
LDD 


#MODP1,RO 

(RO) , AC! 


;PUT A SACKROUND PATTERN INTO AC1. 


c 




6283 
6284 


030374 
030400 


016100 
170100 


000030 






MOV 
LDFPS 


30(R1),R0 

RO 


JSET UP THE FPS, 




1 


6285 
6286 


030402 
030410 


012737 
010100 


030416 


001236 




MOV 
MOV 


f 1$,$#$TMP2 
R 1 , RO 


yCOMFUTE 1HE APDHEoo ur Trie, roHL* 


1 


c 


6287 
6288 


030412 


4r\. £L f ^ T A g\ 

062700 


000004 






ADD 


#4,R0 




c 




6289 
6290 


030416 


171410 






1$; 


MODF 


( RO ) , ACO 


; EXECUTE THE TEST INSTRUCTION . 




• 


6291 

6292 


030420 
030422 


170204 
170305 








STFPS 
STST 


R4 

R5 


•GET THE FPS, 
jGET FEC, 


f 


c 


6293 
6294 


030424 

A ^1 A A A i\ 

030430 


012700 
170100 


000200 




— — — 


MOV 
LDFPS 


1200, RO 
RO 


JSET FD MODE, 


t 




6295 
6296 


030432 

AAA A ^ A 

030436 


012700 
174010 


030726 






MOV 
STD 


#HODFD0,R0 
ACO, (RO) 


? GET THE FRACTIONAL RESULT, 




1 


6297 
6298 


030440 

A ■** A A MM 

030444 


012700 
174110 


030736 






MOV 
STD 


#M0DFD1,R0 
AC1 » (RO) 


?GET THE INTEGER RESULT, 


1 


1 


6299 
6300 


030446 


010102 








MOV 


Rl $ R2 


JSAVE THL DATA IN CASE Or ERROR, 


i 




6301 
6302 


030450 
030454 


010237 
062702 


001240 
000004 






MOV 
ADD 


R2,i#$TMP3 
#4,R2 






f 


6303 
6304 


030460 
030464 


010237 
062702 


001242 
000004 






MOV 
ADD 


R2f §#$TMP4 
*4,R2 




C 


• 


6305 
6306 


030470 
030474 


010237 
062702 


001244 
000Q04 






MOV 
ADD 


R2,»#$TMP5 
#4,R2 




€ 




6307 
6308 


030500 
030504 


010237 
012737 


001246 
030726 


001 250 




MOV 
MOV 


R2,i#$TMP6 
*MODFD0,£#$TMP7 






t 


6309 
6310 


030512 
03J520_ 


012737 
010437 


030736 
001254 


001252 




MOV 
MOV 


#MQDFD1,@#$TMP1Q 
R4,##$TMPl 1 




£ 


i 


6311 
631 2 


030524 
030532 


016137 
010537 


000032 
001260 


00U56 




MOV 
MOV 


32(R1 ) ,@#$TMP12 
R5,##$TMP13 




c 




6313 
6314 


030536 


016137 


000034 


001262 




MOV 


34(Rl),e#$TMP14 






1 


6315 
6316 


030544 
030550 


012702 
JL261JL2 


030726 
000010 






MOV 
CMP 


#MODFD0,R2 
tO(Rt), (R2) 


SCHECK THE FRACTIONAL RESULT, 


t 


t 


6317 
6318 


030554 
030556 


001025 
026162 


000012 


000002 




BNE 
CMP 


10$ 

12(R1),2(R2) 


? BRANCH IF INCORRECT. 


t 
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UNDERVOVER FLOW, USING MODF WITH TRAPS DISABLED, TEST 



"I! 





63*9 


A ~2 A C C A 

0J0J564 


A A 1 AH 
00 I w I \ 








n m c 


1 V9 


i 


i" 
1 


6320 


















6321 


030566 


012702 


030736 






mov 


IMQDFDl t R2 


? CHECK THE INTEGER RESULT. 




6322 


030572 


A ft / 1 A 1 

0261 1 2 


00001 4 






nun 

CMP 


14(RlJ,(F2) 




1 


6323 


030576 


001016 








BNE 


15$ 


; BRANCH IF INCORRECT. { 




6324 


030600 


0261 b2 


000016 


A A A A A *™i 

000002 




CMP 


1 6 ( R 1 ) , 2 ( R2 ) 






C 1 e 

6325 


030606 


001 014 








ft ki fT 


IDS 


— ■ — ■ — — — — — — — 


i! 


6326... 
















i 
\ 




632 7 
6328 


A 3 A &l 4 A 

030610 
030614 


An£ I ft A 

001024 


A A A A 3 "i 

00003 2 






f* kM D 

BNE 


lOfD! 1 DA 

20$ 


jV-rlC.v«l\ 1 no friJi 

• £1 1) a ki n Li 1 i? i ri f ' i"i ij D L' f~* -T* 


t 


6329 
6330 


030616 


026105 


000034 






CNP 


34(Rl),R5 


C 

jCHLCiv TH& r be. 




6331 


030622 


001 030 








BNE 


25$ 




1 


6332 
















t 




6333 


030624 


000161 


000044 




9$; 


JHP 


44CR1) 


JRETURN. 




6334 


















g 


6335 
6336 




030630 








; FRACTIONAL ERROR. 
10$; 


1 

JIHfe, tKKUK WAO NUi AnlltlrAiCtU oU 




6337 


A "3 A £ ^> A 

0306 JO 








12$: 


ERROR 


165 




m 
1 


6338 


030632 


000774 








8R 


9$ 


• 




6339 
6340 









_ : . 


j INTEGER ERROR. 






c 


6341 


030634 


026112 


000024 




15$: 


CMP 


24(R1),(R2) 


?WAS THIS ERROR ANTICIPATED? f 




6342 


030640 


001010 








BNE 


16$ 


J dK ANC H If NUI, 




6343 


030642 


026162 


000026 


000002 




CMP 


26(R1),2(R2) 




1 


6344 


030650 


001 004 








BNE 


16$ 


£ 




6345 
6346 


030652 
030654 


010102 
062702 


000042 






NOV 
ADD 


Rl,R2 
#42, R2 




I 


6347 
6348 


A ^ A £l ^ A 

030660 


0001 1 2 








JMP 


(R2) 


;R0UTINE, | 

— — — __ — . , — • — ■ — . — — — _ , 


1 


6349 
6350 


030662 




— 


— , — _ _ 


16$: 






•TH& C.RROR WAS NOl ANT li, I r A 1 t>u 5U KC.PUK1 \ 








1 V * i DO 






17$: 


ERROR 


166 


• THF I NTF^FR FAT T.iiRF HFRF 




6352 


030664 


J\ A. A T C 1 

000 757 








BR 


9$ 




c 


6353 
6354 










fFPS INCORRECT. 




f 




A "J e: c 




A 1 Ad 37 


A A 1 IK A 
UU 1 ^31 




20$: 


MOV 


R4, i#$TMPJl 


J REPORT INCORRECT FPS, 


i 


6356 


030672 


016137 


000032 


001256 




MOV 


32(Rl),@#$TMP12 


I 




Oj3 / 


A 1 A 7 A A 


1 Ad 1 4,1 






21 $: 


ERROR 


167 






6358 


030702 


000750 








BR 


9$ 




f 


6359 
6360 










: REPORT 


EEC ERROR. 


€ 




6361 


030 ' 0* 


A 4 A*» "3 7 

1 OD S 1 


A A 4 *i £. A 

001 260 




25$: 


MOV 


R5,§#$TMP13 


• 


• 


6362 




016O7 


000034 


001262 




MOV 


34(R1).^»$TMP14 




6363 


A 1 A "7 1 *« 

3 f 1 6 


A 4 A 4 AO 

01 O 1 0* 








MOV 


R 1 , R2 






6364 


030720 


062702 


000036 






ADD 


#36, R2 




Is 


6365 
6366 


A 1 A 7 O A 


A A A 4 4 
OOU1 1 / 








JMP 


(R2) 


t 




6367 


030726 


000000 


oooooo 


oooooo 


MODFD0 : 


.WORD 


0,0,0,0 




i 


6360 


030734 


yv A /V V*V A J% 

oooooo 












g 
* 




6369 




















6370 


030736 


0Q0000 


oooooo 


oooooo 


MODFD1 : 


t WORD 


0,0 r f 




c 


6371 


030744 


oooooo 












i 




6372 


















1 


6373 
6374 


030746 
..0307.4.6. 


104412 






MMMDQNE 


• 
• 

RSETUP 




;G0 INITIALIZE THE FPS AND STACKS AND f 
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UNDER\QVER FLOW* USING MQDF WITH TRAPS DISABLED, TEST 



6375 
6316 



6377 

AHA. 



SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 



VIRTUAL CONSOLE SWITCH REGISTER C HAS 
THE USER T5TPED CONTROL G?) • 



6379 

iiii 



6381 



6383 J 

6384 S 


» •##■»#########.#*####♦##*####»##*########**####**»*#*###•###*##*#* 

!#TEST 21 UNDER\OVER FLOW , USING MOOD WITH TRAPS DISABLED, TEST 


6385 1 
6386 


? * 

f*THlS IS A TEST OF THE MODD INSTRUCTION * S OVER FLOW AND UNDER FLOW 


6387 J 
6388 


f #CQNDITIONS, A SUBROUTINE IS USED TO SET UP THE OPERANDS, EXECUTE THE 
!#MODO INSTUCTION AND CHECK THE RESULTS, 


6389 

6390 J 


; * 

* •#*##*#### *####*##########**#*#***#****^ 



6391 


030750 


000004 






T5T21 ! 


SCOPE 
























6393 


___ — 








j UNDERFLOW TEST 


WITH EXPONENT 


Or THE RESULT ~ FiU *» 1, r ID » 1 


6394 


030752 








NNN1S 








6395 


030752 


104413 








LPERR 




;SET UP THfc, LOOP ON ERROR ADDRESS, 


6396 


030754 


004737 


031366 






JSR 


PC, @#MODDOV 




6397 


030760 


020252 


125252 




1$; 


.WORD 


20252, 1 25252 




6398 


030764 


125252 


125252 






,WQRD 


125252, 125252 




6399 


030770 


020100 


000000 


oooooo 


2$: 


« WORD 


20100, 0, 0, 


; FSRC 


6400 


030776 


000000 














6401 


031000 


000177 


177777 


177777 


3$5 


• WORD 


1 77 , *1 , »1 , »1 


jFRACTIONAL RES, 


6402 


031006 


177777 














6403 


031010 


000000 


000000 


A A. J\ £\ A rf% 

oooooo 


4$: 


• WORD 


t\ ?K f\ f\ 

0,0,0,0 


JINTEtjrER RES. 


6404 


031016 


000000 














6405 


031020 


020252 


125252 




5$: 


.WORD 


20252, 1 25252 


•ERROR r H AC 1 JtONAJU HLo, 


6406 


031024 


125252 


125252 






, WORD 


125252, 125252 




6407 


031030 


000000 


000000 


177777 


6$: 


.WORD 


0, 0, ~1 , -1 




6408 


031036 


177777 














6409 
6410 


031040 
031042 


042200 
142204 






7$; 


42200 
142204 




JFPS BEFORE EXECUTION • 
JFPS AFTER EXECUTION, 


6411 
6412 


031044 
031046 


000012 
104201 






8$: 


12 

ERROR 


201 


?FEC 

;FEC INCORRECT ON UNDERFLOW, 


6413 
6414 


031050 
031052 


000401 
104202 








BR 

ERROR 


9$ 
202 


•ST 155 (BUT FD) 


6415 


031054 








9$ s 








6416 


















6417 










? UNDERFLOW TEST 


WITH EXPONENT 


OF THE RESULT = -193, FiU 5 0, FID = 1 


6418 


031054 








NNN2 • 








6419 


031054 


104413 








LPERR 




;SET UP THE LOOP ON ERROR ADDRESS, 


6420 


031056 


004737 


031366 






JSR 


PC,S*MODDOV 




6421 


031062 


010000 


oooooo 




1$5 


• WORD 


10000,0 


;AC 


6422 


031066 


123456 


000000 






.WORD 


123456,0 




6423 


031072 


010200 


oooooo 


oooooo 


2$: 


.WORD 


10200,0,0,0 


?FSRC 


6424 


031100 


000000 














6425 


031102 


000000 


000000 


oooooo 


3$: 


.WORD 


0,0,0,0 


; FRACTIONAL RES, 


642b 


031110 


000000 














6427 


031112 


000000 


OOOOOO 


oooooo 


4$? 


.WORD 


0,0,0,0 


5 INTEGER RES. 


6428 


031120 


000000 














6429 


031122 


000000 


OOOOOO 


oooooo 


5$: 


• WORD 


0,0,0,0 


J ERROR FRACTIONAL RES, 



6430 031130 000000 



MAINDFC 


«*1 1 »DFFPB~A 


PDP U/34 FPP 


DIAGNOSTIC PART 
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DFFPBA.P11 01 


•NOV-7b 


21 506 




T21 


UNDERXOVER FLOW, USING 


i*rtr\r\ u t Tu f nine rvTCKDT cf\ mn* c T 

MUDD WITH TRAPS DISABLED, TEST 


6431 
6432 


031132 
031136 


000000 
12345b 


oooooo 

oooooo 




6$: 


• WORD 
.WORD 


# 

123456, 


JERROR INTEGER RES. 


6433 
6434 


031142 
031 144 


005213 
005204 






7$; 


5213 
5204 




;f-PS BEFORE EXECUTION. 
•EPS AFTER EXECUTION. 


6435 
6436 


031146 
031150 


000012 
000240 






, 

8$ ; 


12 
NOP 






6437 
6438 


031152 
031154 


000401 
104203 








BR 

ERROR 


9$ 
203 


;ST 047 (BUT FD)» 


6439 
6440 


031156 








9$: 








6441 
6442 


031156 








;QVERFLQW TEST 
NNN3! 


WITH EXPONENT OF 


THE RESULT = 128, FIV = 1, r ID ~ 1 


6443 
6444 


031156 
031 160 


104413 
004737 


___________ 

031 366 






LPERR 
JSR 


— ______ — — _______ — ___ 

PC, iiMODDOV 


jSET UP THE liOOP ON ERROR APDREbS. 


6445 
6446 


031164 
031170 


060252 
125252 


125252 
125252 




t$5 


.WORD 
* WORD 


60252, 125252 
1 25252* 125252 


J AC 


6447 

6448 


031174 
031202 


060100 
000000 


oooooo 


oooooo 


2 $ 5 


. WORD 


60100,0, O f 


? FSRC 


6449 
6450 


031204 
031212 


000000 
000000 


oooooo 


oooooo 


3$: 


. WORD 


0,0,0,0 


JrRACTIONAL RES. 


6451 
6452 


031214 
031222 


000177 
177777 


177777 


177777 


4$5 


.WORD 


17 7,-1,*1,-1 


; INTEGER RES, 


6453 
6454 


031224 
031232 


oooooo 
oooooo 


oooooo 


oooooo 


5$ ; 


* WORD 


0,0,0,0 


JERROR FRACTIONAL RES. 


6455 
6456 


031234 
031240 


000177 
125252 


177777 
125252 


— _____ _ 


6$; 


-WORD 
.WORD 


177,-1 

1 25252, 1 25252 


JERROR INTEGER RES. 


6457 
6458 


031244 
031246 


041200 
1 41206 






7$: 


41200 
141206 




SFPS BEFORE EXECUTION, 
jFPS AFTER EXECUTION . 


6459 
6460 


031250 
031252 


000010 
104204 






8s: 


10 

ERROR 


— — — 

204 


JFEC 

?FEC BAD ON OVERFLOW. 


6461 
6462 


031254 
031256 


000401 
104205 








BR 

ERROR 


9$ 
205 


1ST 520 TO 162 INTO 163 (BUT FD). 


6463 
6464 


031260 




-— — — — — 




9$: 








6465 
6466 


031260 


— - — 






JOVEPFLO* TEST 
NNN4 S 


WITH EXPONENT OF 


THE RESULT * 130, r IV " 0, r ID ~ 1 


6467 
6468 


031260 
031262 


104413 
004737 


031366 






LPERR 
JSR 


— — - — — 
PC , P#MQDDOV 


; SET UP THE LOOP ON ERROR ADDRESS. 


6469 
6470 


03126b 
031272 


060200 
125252 


OOOOOO 
OOOOOO 




1$: 


.WORD 
.WORD 


60200,0 
125252,0 


* A C 


6471 
6472 


031276 
031304 


060200 

oooooo 


OOOOOO 


oooooo 


2$; 


.WORD 


60200,0,0,0 


?FSRC 


6473 
6474 


031306 
031314 


oooooo 
oooooo 


OOOOOO 


oooooo 


3$ : 


• WORD 


0,0,0,0 


? FRACTIONAL RES. 


6475 
6476 


031316 
031324 


oooooo 
oooooo 


OOOOOO 


oooooo 


4$; 


.WORD 


0,0,0,0 


t INTEGER RES. 


6477 
6478 


031326 
031334 


oooooo 

JPJIPJ_0J__ 


OOOOOO 


oooooo 


5$: 


.WORD 


0,0,0,0 


; ERROR FRACTIONAL RES. 


6479 
6480 


031336 
031 342 


000400 
125252 


OOOOOO 
OOOOOO 




6$: 


.WORD 
.WORD 


400,0 
t 25252, 


? error integer res. 


648i 
6482 


03134b 
031350 


006211 
00620b 






7$: 


b2U 
6206 




j EPS BEFORE EXECUTION, 
•FPS AFTER EXECUTION. 


6483 
6484 


031352 
031354 


000010 
000240 






8$; 


10 

NOP 




J FEC 


6485 
648& 


031356 
. 03U60 


000401 
104206 








BR 

ERROR 


9$ 
206 


:ST 520 TO 162 INTO STORE ZERO TWICE. 
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6487 031362 000137 031774 9$; JMP @#NNND0NE jGO TO NEXT TEST . 

6488 . . 



6489 
6490 


jTHIS SUBROUTINE* MQDDQV, IS CALLED TO SETUP THE 

^OPERANDS, EXECUTE THE MODD INSTRUCTION AND CHECK THE RESULTS, 


6491 
6492 


?IT IS CALLED THUS 5 


6493 
6494 


I ACARG? .WORD X,X,X, X ? AC OPERAND 
i FSRCARG * • WORD X,X,X,X jrSRC OPERAND 


6495 
6496 


f FRES: , WORD X,X,X,X f FRACTIONAL RESULT 
\ INTRES! .WORD X,X,X,X ? INTEGER RESULT 


6497 
6498 


! ERFRESs • WORD X,X f X,X | ERROR FRACTION RESULT 
f ERINTRES: .WORD X, X, X, X ? ERROR INTEGER RESULT 


6499 ! 
6500 


FPSBS .WORD X ;FPS BEFORE EXECUTION 
f FPSA? , WORD X J FPS AFTER EXECUTION 


6501 
6502 


F ERR I : ERROR X ^FRACTION ERROR 
; BR CONT 


6503 
6504 


? ERR2S ERROR X i INTEGER ERROR 
f CONT? ^RETURN ADDRESS 


6505 
6506 


fTHE OPERANDS ARE SET UP (USING ACO FOR THE AC ARGUMENT), THE MODD 


6507 ! 

65d8 


\ INSTRUCTION IS EXECUTED. THEN THE RESULTS ARE RETRIEVED, 

j THE FRACTION PART OF THE RESULT IS COMPARED WITH r RES, Ir THIS IS COKHtC 1 


6509 
6510 


\ THEN THE INTEGER PART IS COMPARED WITH INTRES, IF BOTH OF THESE ARE CORRECT 
f THEN THE rPS IS COMPARED WITH rPSA. AriER EXECUIJ.UN ir NU LKKUKo UCCUKKc-U 


651 1 
6512 


,f utw MniM^flV yJTfT DrTHDH Tfl fflMT TP "TWIT P"P** bJ h *k T WrTIRRlTfT 
' A n fc W MUUUU V *f x uu rv C 1 U t\ N 1 U L UP* 1 . ir Ant r r O WHO X Wv. URHCtV, 1 

f IT IS REPORTED HERE, IF THE FRACTION IS INCORRECT IT IS COMPARED WITH 


6513 
6514 


fTHE ANTICIPATED BAD FRACTION, ERFRES. IF THIS DOESN'T MATCH 

•THE TRUE RESULT THEN THE ERROR IS REPORTED HERE . IF THE ANTICIPATED 


6515 
6516 


^FAILURE MATCHES THE TRUE RESULT THEN MQDDQV PASSES CONTROL TO THE 
f ERROR CALL AT ERR1 . LIKEWISE IF THE INTEGER PART OF THE RESULT IS 


6517 ! 

6518 ! 


f NOT CORRECT THEN IT IS COMPARED WITH THE ANTICIPATED INTEGER 
r FAILURE, IF THIS POEN'T MATCH THEN THE ERROR IS REPORTED HERE. 


6519 


?IF A MATCH IS HADE HQWEVER# MODDOV WILL RETURN CONTROL TO THE ERROR 



6520 ; SCALL AT ERR2. 

6521 



6522 


031366 


012601 




MODDOV 8 MOV 


(SP)+t Rl 


?GET A POINTER TO THE ARGUMENTS 


6523 


03U70 


012700 


000200 


MOV 


#200, R0 


?SET FD MODE, 


6524 


031374 


170100 




LDFPS 


RO 




6525 


031376 


010100 




MOV 


R1,R0 


?SFT UP ACO 


6526 


031400 


172410 




LDD 


(R0),AC0 




6527 


031402 


012700 


025702 


MOV 


IMODPt, RO 


?PUT A BACKROUND PATTERN INTO AC1. 


6528 


031406 


172510 




LDD 


(R0),AC1 




6529 


031410 


016100 


000060 


MOV 


60(R1),R0 


;SET UP THE FPS, 


6530 


031414 


170100 




LDFPS 


RO 




6531 


031416 


012737 


031432 001236 


MOV 


«l$,e#$TMP2 




6532 


031424 


010100 




MOV 


R1,R0 


;COMPUTE THE ADDRESS OF THE FSRC. 


6533 


031426 


062700 


000010 


ADD 


#10, RO 




6534 














6535 


031432 


171410 




1$S MODD 


(R0),AC0 


JEXECUTE THE TEST INSTRUCTION. 


6536 














6537 


031434 


170305 




STST 


R5 


; GET THE FPS, 


6538 


031436 


170204 




STFPS 


R4 


j GET THE FPS. 


6539 


031440 


012700 


000200 


MOV 


#200, RO 


JSET FD MODE. 


6540 


031444 


170100 




LDFPS 


RO 




6541 


031446 


012700 


031754 


MOV 


#MODDD0,R0 


? GET THE FRACTIONAL RESULT. 


654? 


031452 


174010 




STD 


ACO, CRO) 
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£ C A 1 

654 3 


A 1 4 A K A 


A 4 llftft 

01* / 00 


j 1 754 








iMnnr.ni da 


7 vj & i i nc. 1 1» I C v» D r\ nLOUL) 1 * 


i 

I 


6544 


031 460 


174110 








^ fn t\ 

STD 


Ik f* 4 t Q A * 

AC 1 , (R0 ) 


i 

■ 




654b 


031 462 


010102 


— — 






NOV 


l\ A , t\ 4t 


JgnVt IH&. UA1A AN LAoC" Ur CKHUH. 


i 


_ C A T 

6547 
6548 


A 5 4 A £. A 

031 464 
031470 


010/3/ 
062702 


A A 4 IjIA 

001240 

A A A _% 4 A 

000010 






ADD 


# 10# R2 


i 




6549 


A "i 4 At A 

J I 474 


A 4 AT Jl 
1 02 J / 


A A 4 ^ A 1 




— — 


Mn U 
"UV 


DO tt # C TMD A 


— — ____ _ , — — — ______ — _ _ _ — 


i 


6550 


A «| 1 t A. /\ 

031500 


052702 


A A A A 4 A. 

000010 






ADD 


« 4 A ^5 

• 10, R2 


i 

■ 




_ C £ 4 

6551 


A 1 4 C /\ A 

31 504 


A 4 A -*i J T 

010237 


A A 4 *\ A A 

001244 






mu v 


K4f PIS 1 MrD 






6552 


031510 


062702 


ooooio 






ADD 


# 1 0# R2 




i 


6553 


031514 


010237 


001246 






MOV 


R2#@i$TMP6 


i 




6554 


031520 


012737 


A ~% 4 «| f 4 

031754 


A, A 4 #1 ff A 

001250 




MOV 


#M0DDD0f «? * STMP 7 




4 

1 


free 

6555 


031526 


A 4 *> 1 1 1 

012737 


A 1 4 *V £. A 

031 764 


A A 4 ItO 

001252 




"U V 


« iu ri r\ r\ c\ 1 Qi *i> UD4 A 
9 MUuUUl ,5*#51^"*0 




6556 


031534 


010437 


001254 






wov 


R4 f p#$TMPl 1 


4 

■ 




655/ 


UJ15 40 


A 4 £ 4 11 
1 I i f 


A A A A t*. O 

000062 


A A i 16^ 

00*250 




wu V 








6558 


031 546 


010537 


A A 4 A f A 

001260 








R5 , ## STMP 1 3 




4 


6559 
6560 


031552 


016137 


000064 


001262 




MOV 


64(Rl),(a#$TMPl4 


1 


4 

f. 


6561 


031 560 


A 4 11 Al 

01 *? 702 


A 5 4 "T C 

031 754 






MOV 


# WIUOUUO , K2 


J LnCtVn inc. r i iunhjj nc«ou ju i * 


6562 


031564 


010103 








MOV 


Rl f R J 






656 3 


031 poo 


A £ 1 "J A S 

06*6 /03 


A A A A ^ 

000020 








f 2 , K J 






6564 


031572 


A, 4 ~ • A A 

01 2700 


/ % A. A A\ >| 

000004 






i« f\ tf 

wOV 


# 4 f HO 




4 


6565 
656b 


031576 

All j_ a a 

031600 


022223 
001023 






2$: 


CMP 
8NE 


(R2)+, (R3)+ 

4 A <» 

10$ 


< 

JtBHAJNC" If 1NLUKHLL1, 




6567 


031602 


077003 


— — — — — 






SOB 


R0,2$ 




1 


6568 
















■ 




6569 


Oi 1004 


A 4 "llAl 
1 2 / 02 


A)4 "t £L A 

J 1 76 4 






FlU V 


f WSOUIJU 1 , H2 


• C UCC V TUP T *&TC (IV Q D IT Cfl r T 




6570 


031610 


010103 








NOV 


K I # ft J 




c 


6571 
6572 


031612 
031616 


062703 

A 4 ^ « A A 

012700 


000030 

A A A A A il 

000004 






ADD 
NOV 


#30, R3 
14, R0 


1 


41 

i 


6573 
6574 


031622 
031624 


022223 

J\ J\ 4 A 4 "3 

001 01 3 






3$: 


CMP 


(R2) + t CR3H 

4 C A 

15$ 


JoHANLH It iNLUKKLLl,, 




6575 


031626 


077003 


- 






SOB 


R0,3$ 






6576 


















1 


6577 
6578 


031630 


A £* 4 A A 

026104 


000062 






CMP 


62 ( Rl ) f R4 


»/^LIC<^i^ nut? Pnc 

?CHECK THE rPS- 


1 


6579 
6580 


031634 


001027 








BNE 


20$ 


? BRANCH IF INCORRECT. 

.. 




65 o! 
6582 


All £ 

J16 JO 

031642 


A 1 K 1 AC 

040105 

0010 3 3 


A A A A _ if 

000064 






CMP 
BNE 


64(R1),R5 
25$ 




1 


6583 
6584 


031644 


000161 


000074 




9$ • 


JMP 


74CR1) 


J RETURN • 


4 1 


6585 
6§86 










S FRACTIONAL ERROR • 






658 7 


A 1 4 _ C A 

031650 








loss 






• TUC ['DDDD _ ft <S MllT aHTTfTDATCn on 

* 1 lib trpUK n AO NUi ANllllrAlbu OU 




6588 




LO. 4 1.7 6 






12$: 


ERROR 


176 


jREPORr THE INCORRECT FPACTION HERE, 


1 


6589 
6590 


031652 


000774 








8R 


9$ 


- — ■ — ■ ■ ■ : 


g 


6591 
6592 


031654 


— — 

A 4 ^ ~| A Aj 

012702 


A. -V 4 *TI £! A 

031764 




? INTEGER ERROR . 
15$: MOV 


#M0DDD1,R2 


?WA5 1 HE IN I Eb-K EKHUH AN 1 IL IrA 1 fc.U f 




6593 


031560 


010103 








MOV 


R1,R3 






6594 


03 1662 


0627Q3 


OOQ050 






ADD 


#50. R3 




4 


6595 
6596 


031666 
.,. Qli67a_ 


012705 
022223 


000004 




60$: 


MOV 
CMP 


#4,R5 
J .CR2Jt # .(R3) + 






6597 


031674 


001005 








BNE 


17$ 


i BRANCH IF NOT ANTICIPATED. 


4 


6598 


031670 


077503 








SOB 


R5, 60$ 





* 


6599 
6600 


031700 
031702 


010102 
062702 


000072 




MOV 

ADO 


HI f 

a 1 rj fj *} 
n f £. f H4> 


. Tfl TUXT PDOnD DtrDrlDT I M T hi F PALI T W C 




6601 








— 






jROUTXNE, 




_6M2_ 


031706 


0001 12 






JMP 


C R2) 


. , _ , 


1 


6603 
6604 


031710 






, — , 

lbs: 






• I H& C.HRUK WAo NU1 AN I AUrAi LU Oil KfcrUKl 


i 
i 


6605 


Oil 7 1 


< nil n 




i f § ; 


C* K rf U p 


lit 


• THF T NTFGFR F A T LURF HFRF 


6606 


Oil / 1 Z 


AAlilCA 

UUU 






on 








6607 
6608 








?FPS 


INCORRECT. 






< 


6609 


031714 


010437 


001254 


20$: 


HQV 


R4, §#$TMPll 


? REPORT INCORRECT EPS. 




6610 


031720 


016137 


000062 


001256 


MOV 


62(R1),§#$TMP12 




< 


6611 


031726 


1Q4200 




21$: 


ERROR 


200 




6612 


031730 


000745 






8R 


9$ 





6613 
6614 



J REPORT FEC ERROR, 



6615 
6616 



031732 

031736 



010537 
016137 



001260 
000064 



001262 



25$: MOV R5,g#$TMP13 

MOV 64(R1),§#$TMP14 



6617 
6618 



031744 
031746 



010102 
062702 



000066 



HQV 
ADD 



Rlf R2 
#66, R2 



6619 

M2Q 



031752 000112 



JMP 



CR2 ) 



6621 031754 000000 000000 000000 MODDDO: . WORD 

6622 031762 000000 



Of f 0,0 



662 3 
6624 



031764 000000 000000 000000 NQDDPlI .WORD # 0f0f0 



6625 031772 000000 
6626 


f 


6627 031774 

6628 031774 104412 


NNNDONE: 

RSETUP jGQ INITIALIZE THE FPS AND STACK? AND 


< 


f 


6629 
6630 


;SEE IF THE USER HAS EXPRESSED 

; THE DESIRE TO CHANGE THE SOFTWARE 


i 




6631 
6632 


j VIRTUAL CONSOLE SWITCH REGISTER (HAS 
j THE USER TYPED CONTROL G? ) , 




I 6633 i 
6634 


€ 


6635 
6636 


• •############♦###♦#*♦###*###*###*####»##*###*###*#######*###*##* 
;*TEST 22 INTERRUPT CORRECT FLOWS TEST 


i 




6637 
6638 


• * 

J*THIS IS A TEST OF THE 1 CORRECT ' FLOWS, THIS PART OF THE MICRO CODE 




1 


6639 
6640 


j*HAS AS ITS PURPOSE INSURING THAT INTERRUPT REQUESTS MADE DURING 
;#CERTAIN LENGTHY FPP INSTRUCTIONS GET HONORED. THIS IS DONE 


€ 


< 


6641 
6642 


;#IN A WAY SUCH THAT IF AN INTERRUPT REQUEST OCCURS DURING ONE 
?*OF THESE INSTRUCTIONS THE STATE OF THAT INSTRUCTION'S 


1 




6643 
6644 


; ^EXECUTION WILL BE THE SAME AS IF THAT INSTRUCTION HAD NEVER 
:#8EEN FETCHED AND ITS EXECUTION NEVER STARTED, THUS THE MICRO CODE 




4 


6645 
6646 


?#W1LL RESTORE ALL REGISTERS, BACK UP THE PC AND LEAVE THE 
:*FPS AND ACO THROUGH ACS UNMODIFIED. 


4 


t 


6647 
6648 


;#THE INSTRUCTIONS FOR WHICH THIS IS NECESSARY ARE : 
j# ADD (OR SUB) 


i 




6649 
6b50 


?* DIV 
!# MUL 




€ 


6651 
665? 


f # MOD 

:*f BOTH DOUBLE AND FLOATING) 


< 


t 


6653 

665 4. 


?#ALL ADDRESSING MODES WILL BE TRIED WITH THE ADDD INSTRUCTION. THEN 
:#EACH OF THE OTHER INSTRUCTIONS WILL BE TRIED USING MODE 1. 


( 
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6655 






•*NUlt< AHA* IHIb AboA NEEUd A OrCL-iHlj INltUnnUri wuMUliti 

j #WHICH WILL PROBABLY ONLY BE PRESENT IN DEC'S MANUFACTURING EN V IRONwEN i § 


6657 




... _ — _ 


;#iU KUN, 1 n A o artL 1 Alt tUUlrntwl I o UCoivjimdu iu nftJlDE, ftn 


.66.5.8 _ 






S#INT£RRUPT REQUEST IN THE PROCESSOR lr A BIT 15 SET IN IIS 5TAIU5 


6659 




._ _ 


J#REGI5TER ANU ONLY WHEN AN P Pr IHo JTKUv. 1 AUN Id EN^UUN A EKEU , 


6660 






: *THEREFORE THIS TEST WILL BE RUN CONDITIONALLY (DEPENDENT UPON WHETHER 


6661 







;*0R NOT THE STATUS REGISTER ur THE IE5A EUUJlrWEwl I AMEo UUA wittn KEP Ervc,ww.EU S • 


6662 






S*THIS TEST CAN ALSO BE DESELECTED BY TURNING SWITCH 7 Or THE 


6663 






?*SWITCH REGISTER (PHYSICAL OR VIRTUAL) ON, 


6664 






S*THE TEST ASSUMES THAT THE TEST EQUIPMENT f S &1AJLU5 REi»iSIER la Ai 


6665 






J*L0CATION 777774 (NOTE THAT ALL REFERENCES IU IHI& LUCAilUN AHE 


6666 






;#MADE INDIRECT THROUGH THIS PROGRAMS LOCATION C0RINT# 50 THAT 


6667 




— — 


«mTe* nut? iicec n » c unrti r i pp» hue* t c c t cnitTDurtlf i c CTXTltc DPPTCfli'D *rn 

J#IF THE USER HAS MODIFIED THE TEST EQUIP^EW I * o SlAAUo KEbAoiEH IU 


6668 






J*RESP0ND TO A DIFFERENT ADDRESS LOCATION CORINT MUST BE 


6669 






J*MADE TU CONTAIN THAI STATUS KEvjISIEK f o NEW AUUKE&oJ f 


6670 






j#THIS PROGRAM ASSUMES THAT THE TRAP VECluR rUK 1 HE lEoI EUU 1FMEN i i& ilu. 


66/1 






• a & r* & T M MriTtr TUAt Art D C C C D G* hi T F Q Tfl THT^ T D & D UPTTOR ADR T N H T BPfT . THRfKKiH 
"♦AvjAJLN NU*E IriAJ ALL HEP &r tNLE>a 114 lnAO Anftr vc.^iuf\ lirvE. AWWArvCiv* l f inrvuuwn 


6672 






;#THIS PROGRAM'S LOCATION CORTRP (Ir THE IESI EQUlrnEWi IS 


6673 






f»MADE TO TRAP 10 A DIFFERENT VELAUR LUCAIAUW lUKinr nuol Luw 1 Ax w lric* 








• jtArifiDPCc nc* tutu uur'Tnoi 


6675 






• * 


6676 








6677 


031776 


000004 


TST22 S SCOPE 


6678 








6679 


032000 


032777 000200 


147132 BIT #200,iSWR JSEE IF THE USER HAS DESELECTED THIS 


6680 






5 TEST USING THE SWITCH REGISTER, 



6681 032006 00t4Q2 BEQ C0R1 ;IF NOT SEE IF TEST EQUIPMENT IS PRESENT, 

6682 032010 000137 033146 JMP g»C0R D0NE ;ELSE DO NOT RUN TEST, 



6683 

6684 032014 012737 032040 000004 CORt? MOV »C0R2t <M ERRVECT ;SEE IF THE TEST EQUIPMENT * S STATUS 

iOf^CORINT y REGISTER TIMES OUT, 

»CPSPU R f PjERRVECT 

C0R3 j DIDN ! T TIME OUT SO START TEST • 

6689 032040 022626 C0R2: CMP^ (SP) + f (SP)+~ JlF THE REFERENCE TIMES OUT Do 

6690 032042 012737 036646 000004 MQV »CPSPUR t @#ERRVECT 

6^91 032050 000137 033146 JMP @f C0RD0NE ?N0T RUN TEST. 

6692 

6693 ? TEST ADDD MODE 



6694 


032054 






COR 3 5 








6695 


032054 


005227 


177777 




INC 


#-1 




669* 


032060 


001002 






BNE 


COR 3 3 




6697 


032062 


104401 






TYPE 






6698 


032064 


_537621 






.WpRD 


C0RMES 




6699 
6700 


032066 
_ 032.Q66. 


.1044J3 




COR33S 


LPERR 




;SET UP THE LOOP ON ERROR ADDRESS. 


6701 


032070 


004737 


032646 




JSR 


PC,£#CQRSUB 




6702 


032074 


040200 


Q00100 


000200 ISj 


.WORD 


40200, 100,200, 


300 jACO 


6703 


032102 


000300 












6704 


032104 


123456 




2j£_5. 


.WORD 


123456 


?R0 


6705 
6706 


032106 
03HI0 


000200 
172000 




3$: 
4$; 


200 
ADDD 


AC0,AC0 


JFPS 

j TEST INSTRUCTION. 


6707 


032112 


000240 






NOP 






6708 


0321H _ 


005037 


033130 




Cl.R 


a#CQRFLG 


j RESET INTERRUPT FLAG 


6709 


032120 


104252 






ERROR 


252 


?N0 INTERRUPT' TEST EQUIPMENT FAILED, 


6710 


_JDJ2_L<L2L_ 


000401 






BR 


11$ 





6685 032022 012777 000000 001112 MOV 

6686 32030 012 737 036646 000004 MQV 

6687 032036 000406 BR 
6688 



MAINDEC 


-t 1-DFFPB 


•A 


POP 11/34 FPP 


DIAGNOSTIC PART 2 


MAC X 1 1 27( 1006) 


07-FEB-77 12:06 PAGE 122 


DFFpBA,PH 01 


•NOV-76 


21:06 






INTERRUPT CORRECT FLOWS 


TEST 


6711 
6712 


032124 
032126 


104253 






5$; 
11$: 


ERROR 


253 


JlNCORRECT STATE AT INTERRUPT, 


67 U 
6714 


032126 




, 




? TEST 
COR45 


ADD MODE 


1 




6715 
6716 


032126 
032130 


104413 
004737 


, 

032646 






LPERR 
JSR 


. — „ 

PC* £*#CORSUB 


f SET UP THE LOOP ON ERROR ADDRESS. 


6717 
6718 


032134 
032142 


040201 
111111 


000555 


077007 


1$S 


.WORD 


40201, 555 t 77007f 


HUH ?AC0 


6719 
6720 


032144 
0321 46 


032134 
000217 


- ■ — 




2$: 
3$: 


.WORD 
217 


1$ 


5R0 
?FPS 


6721 
6722 


032150 
032152 


172010 
000240 






4$; 


ADDD 
NOP 


(R0),AC0 


; TEST INSTRUCTION 


6723 
6724 


032154 
032160 


005037 
104252 


033130 






CLP 

ERROR 


PfCQRFLG 
252 


j RESET INTERRUPT FLAG 

; REPORT FAILURE, NO INTERRUPT. 


6725 
6726 


032162 
032164 


000401 
104254 









8R 

ERROR 


11$ 

254 




6727 
6728 


032166 








11$! 








6729 
6730 


— — — 
032166 








?TEST 
COR 5 J 


ADDD MODE 


2 




6731 
6732 


032166 
032170 


104413 
004737 


032646 






LPERR 
JSR 


PC,£#CORSUB 


?SET UP THE LOOP ON ERROR ADDRESS. 


6713 
6734 


032174 
032202 


040202 
070707 


111333 


052525 


1$5 


.WORD 


40202, 111333,52525,70707 ;AC0 


6735 
6736 


032204 
032206 


032174 
000205 






2$$ 

3$S 


• WORD 
205 


1$ 


?R0 
?FPS 


6737 
6738 


032210 
032212 


172020 
000240 






4$: 


ADDD 
NOP 


(R0)+, ACO 


f TEST INSTRUCTION 


6739 
6740 


032214 
032220 


005037 
104252 


033130 






CLR 
ERROR 


§#CORFLG 

252 


jRESET THE INTERRUPT FLAG 

J REPORT FAILURE, NO INTERRUPT, 


6741 
6742 


032222 
032224 


000401 
104255 








BR 

ERROR 


11$ 

255 


?CORRECT FLOWS FAILED, 


6743 
6744 


032226 









11$; 








6745 
6746 


032226 








JTEST 
C0R6S 


ADDD MODE 


3 




6747 
6748 


032226 
032230 


104413 
004737 


— - —- — — — 
032646 






LPERR 
JSR 


PC,e*CORSUB 


;SET UP THE LOOP ON ERROR ADDRESS, 


6749 
6750 


032234 
032242 


040203 
000001 


071715 


072746 


1$; 


.WORD 


40203,71735,72746,1 ?AC0 


6751 
675? 


032244 
032246 


032270 
000206 






2$: 
3$: 


• WORD 
206 


10$ 


JRO 
?FPS 


6753 
6754 


032250 
032252 


1 72030 
000240 






4$; 


ADDD 
NOP 


$(R0)+, ACO 


; TEST INSTRUCTION 


6755 
6756 


032254 
032260 


005037 
104252 


033130 


_ 




CLR 
ERROR 


§#CQRFLG 
252 


; RESET THE INTERRUPT FLAG 
; REPORT FAILURE, NO INTERRUPT, 


675 7 
6758 


032262 
032264 


000403 
104256 






5$s 


6R 

ERROR 


11$ 

256 


jCORRECT FLOWS FAILED, 


6759 
6760 


032266 
032270 


000401 
032234 






10$ : 


BR 

• WORD 


11$ 
1$ 


;USED FOR THE ADDRESSING OF THE OPERAND 


6761 
6762 


032272 








11$: 






flN THIS MODE. 


6763 
6764 


012272 








t TEST 
CQR75 


ADDD MODE 


4 




6765 
6766 


032272 
.032274 


104413 
004737 


032646 






LPERR 
JSR 


PCitCORSUB 


;SET UP THE LOOP ON ERROR ADDRESS, 



I 





6767 


032300 


040204 


123456 


0701 23 


1 $ ; 


« WORD 


40204, 1 23456 


,70123,45671 SACO 




r- 


6768 


032306 


045671 












.„ . „ = _ : _ 


( 




6769 


032310 


032310 






_ 

2$ : 


• WORD 


. ~ .-- - 

1 $ + 1 


f RO 






6770 


032312 


000212 






3$s 


212 




?FPS 




1 


6771 


032314 


172040 




~ — . 


4$ S 


ADDD 


— - 

~(R0) # AGO 


?TEST INSTRUCTiON 






_6122^. 


032316 


000240 








NOP 






— — — „____ 




6773 


032320 


005037 


033130 




■ — — 


CLP 


CORFLG 


;RESET THE INTERRUPT FLAG 




_f 
1 


6774 


032324 


104252 








ERROR 


252 


? REPORT FAILURE. NO INTERRUPT, 


( 




6775 


032326 


000401 








8R 


11$ 








6776 


032330 


104257 








ERROR 


257 


;C0RRECT FLOWS FAILED 




1 


6777 


032332 








lis; 












6778 














- 








6779 










;f EST 


__„________«. — _ 

ADDD MODE 


5 


: ■ — : : : , : — — 




f 


6780 


032332 








CGR8S 












6781 


032332 


104413 


- 






LPERR 




; SET UP 1HE LOUP UN &RKUK AUUKildo, 






6782 


032334 


004737 


032646 






JSR 


PC#§#CORSUB 






1 


6783 


032340 


040205 


076543 


021076 


1$; 


• WORD 


40205, 76543, 


21076,54321 j ACO 






6784 


032346 


054321 


















6785 


032350 


032376 






2$ : 


♦ WORD 


1 $ + 2 


* RO 




i 


6786 


032352 


000213 






3$s 


213 




?FPS 






6787 


032354 


172050 


- — 




4$ : 


ADDD 


#«*(R0) , ACO 


?TEST INSTRUCTION 






- — 67_8.8_.__ 


032356 


000240 








HOP 








I: 


6789 


jPV jot «th *\ at _#i 

032360 


005037 


033130 




__ 


CLR 


i#C0RF LG 


JRESET THE INTERRUPT r LAG 






6790 


032364 


104252 








ERROR 


252 


? REPORT ERROR. NO INTERRUPT , 






6791 


032366 


000403 








BR 


1 1 $ 






1 


6792 


032370 


104260 






5$: 


ERROR 


260 


;C0RRECT FLOWS FAILED, 






6793 


032372 


000401 








BR 


IIS 








6794 


032374 


032340 






loss 


, WORD 


IS 






at; 
i 


6795 


032376 








11$: 






, - ... ,,, .... 






6796 






















6797 










t TEST 


ADDD HQDE 


6 






__r 
1 


6798 


032376 








COR9S 












6799 


032376 


10441 3 








LPERR 


— __ - — 


•SET UP THE LOUP UN LRRUK AUPHLdo # 






68&0 


032400 


004737 


032646 






JSR 


PC, SMCORSU8 






1 


6801 


032404 


040206 


034353 


063730 


1 $ • 


, WORD 


40206, 34353, 


63730,31323 ;AC0 






6802 


032412 


031323 


















6803 


032414 


032403 






2$ 5 


• WORD 


J S - 1 


: ________ __ , _ ™_™_«___ _ . 

# R0 




___ 
1 


6804 


032416 


000214 






3$: 


214 




?FPS 






68$5 


032420 


172060 


_PV Jf\ _#% jth, _Mk 4 

000001 




4$ S 


» Pi r\ pv 

ADDD 


1 (RO) , ACO 


• TCCT THCTOIirTTriM 

JJ-tLbl 1N51KULI1UN 






6806 


032424 


005037 


033130 






CLR 


p#CORFLG 






1 


6807 


032430 


104252 








ERROR 


252 


JREPORT FAILURE NO TRAP, 






6808 


032432 


000401 








6R 


lis 








6809 


032434 


104261 


— - — __ — 




5$S 


ERROR 


261 






_ 
1 


6810 


032436 








_Jl$J_ 












6811 




— , — — ™__ 








- 










6.812 










?TEST 


ADDD MODE 


7 






1 


6813 




032436 








COR10? 












681_4 


_fi_124J6 


104413 








LPERR 




jSET UP THE LOOP ON ERROR ADDRESS. 





* 
1 


6815 


032440 


004737 


032646 






JSR 


PC, ##CORSUB 






6816 


032444 


040210 


OTP 107 


062426 


is; 


. WORD 


40210, 70lO7f 


62426,55555 ; ACO 






6817 


032452 


055555 


















6818 


032454 


032477 






2s : 


,WQRD 


10S-1 


?R0 




I 


6819 


032456 


000204 






3$; 


204 




?FPS 






68?0 


032460 


17?07Q 


000001 






ADDO 


..iljL&Pj^Acg 


; TEST INSTRUCTION 




1 


6821 


032464 


005037 


033130 






CLR 


BtCORFLG 






6822 


032470 


104252 








ERROR 


252 


? REPORT FAILURE NO TRAP 





MAINDEC 


-tl'OFFPB 


-A 


PDF .11/34 FPF 


DIAGNOSTIC PART 2 


MACYl 1 27(1006) 


07-FEB~77 12S06 PAGE 124 




DFFPBA,P! 1 0! 


-NOV~76 


21S 06 


T22 


INTERRUPT CORRECT FLOWS 


TEST 




6823 
6824 


032472 
032474 


000403 
104262 




5$ 5 


BR 

ERROR 


1 1 $ 

2&2 





•CORRECT FLOWS FAILED, 




6825 

.6826. 


032476 
032500 


000401 
032444 




10$ : 


BR 

.WORD 


its 

1$ 








6827 
6828 


032502 






11$; 












6829 
6830 


032502 






•TEST 
C0R1 1 ; 


DIVD MODE 


t 








6831 
6832 


032502 
032504 


104413 
004737 


032646 




LPERR 
JSR 


PC# $#CORSU& 




• SET UP THE LOOP ON ERROR ADDRESS, 




6833 
6834 


032510 
032516 


04021 1 
001122 


033445 056677 


1$; 


• WORD 


40211, 33445, 


56677,001122 ;AC0 




6835 
6836 


032520 
032522 


032510 

000205 




2$: 
3$; 


• WORD 
205 


1$ 




?R0 
•FPS 




6837 
683$ 


032524 
032526 


174410 
000240 




4$; 


DIVD 
NOP 


(R0),AC0 




; TEST INSTRUCTION 




6839 
6840 


032530 
032534 


005037 
104252 


033130 




CLR 
ERROR 


§#CORFLG 
252 




•REPORT FAILURE, HQ TRAP . 




6841 
6842 


032536 
032540 


000401 
104263 




5$: 


m 

ERROR 


11$ 

263 




•CORRECT FLOWS FAILED, 




6843 
6844 


032542 






ll$s 












6845 
6846 


032542 






J TEST 
C0R12: 


MULD NODE 


1 








6847 
6848 


032542 
032544 


104413 
004737 


032646 




LPERR 

JSR 


PC, ##CORSUB 




•SET UP THE LOOP ON ERROR ADDRESS, 




6849 
6850 


032550 
032556 


040212 
063&50 


165411 046252 


1$; 


.WORD 


40212,165411 


,46252,63650 jACO 




6851 
6852 


032560 
032562 


032550 
000210 




2$5 

3$; 


• WORD 

• WORD 


t$ 

210 




?R0 
•FPS 




6853 
6854 


032564 
032566 


171010 
000240 




4$; 


MULD 
NOP 


CRO), ACO 




? TEST INSTRUCTION 




6855 
6856 


032570 
032574 


005037 
104252 


033130 


... — _ 


CLR 
ERROR 


@#CORFLG 
252 




j REPORT FAILURE, NO TRAP. 




6857 
6858 


032576 
032600 


000401 
104264 




5$; 


BR 

ERROR 


11$ 
264 




•CORRECT FLOWS FAILED, 




6859 
6860 


032602 






lt$5 












6861 
6862 


032602 






•TEST 
C0R1 3; 


MODD MODE 


1 








6863 
6864 


032602 
Q326Q4 


104413 
004737 


032646 




LPERR 

JSR 


PC , £#CORSUB 




• SET UP THE LOOP ON ERROR ADDRESS, 




68^5 
6866 


032610 
032olb 


04021 3 
171623 


045654 054542 


i$s 


.WORD 


40213,45654, 


54542,171623 • ACO 




6867 
6868 


032620 
032622 


032610 
000412 




2$: 
3$: 


• WORD 
.WORD 


1$ 
412 




*R0 
•FPS 




6869 
6870 


032024 
032626 


171410 
000240 




4$: 


MODD 
NOP 


CRO J , ACQ 




• TEST INSTRUCTION. 




6871 
6872 


032630 
032634 


005037 
1 04252 


033130 




CLR 
ERROR 


£*CORFL(S 




• REPORT FAILURE NO TRAP, 




6873 
6874 


032636 
032640 


000401 
104265 




5$; 


BR 

ERROR 


11$ 
265 




•CORRECT FLOWS FAILED, 




6875 


032642 


000137 


033146 


il$* 


JNP 


SiCORDONE 




•FINISHED TEST I 





6876 __________ . . 

6877 -THIS SUBROUTINE, CORSUB, IS CALLED TO SET UP THE OPERANDS 
6878 ? AND CHEC K THE RESULTS IN THIS TEST. IT IS CALLED THUS? 



rr 



MA1NDEC 


»i i-pFFPe 


>-A 


PDP 11/ 


H FPP 


DIAGNOSTIC PART 


2 


MAC X 1 1 27(1006) 07-FEB-77 12;06 PAGE 125 




DFFPBA,P11 01 


•NQV-76 


21 506 




T22 INTERRUPT CORRECT FLOWS TEST 




6879 
6880 










* 




JSR PCitfCORSUB 




6881 i 
688? ! 


f 2$; 




,*ORD X,X,X,X ?AC0 OPERAND 
.WORD X ?R0 




6883 ! 

6884 ! 


! 3$; 
; 4$: 




.WORD X ?FPS 

INST ; TEST INSTRUCTION TO BE 




6885 
6886 










# 

• 

* 




? EXECUTED. 

ADR ; AN ADDRESS OFFSET FOR 




6887 ; 

6888 i 


• ? CERTAIN MODES OR NOP, 
\ ERROR 252 JNQ TRAP ERROR. 


6889 1 

6890 ! 


\ . 5$! 




BR 11$ 

ERROR N JCORRECT FLOWS FAILURE. 




6891 
6892 


f 10$; 




BR 11$ ^OPTIONAL FOR CERTAIN MODES, 
, WORD ADDRESS J 0PTIONAL FOR CERTAIN MODES, 




6893 

6894 ! 


f u$; 

* 

> 


6895 J 

6896 1 


'CORSUB WILL 
' THE FPS WILL 


PICK UP A POINTER TO THE ARGUMENTS, IN Rl. ACO, RO AND 
BE SET TO THE DESIGNATED VALUES. THEN THE TEST MODULE 




6897 1 

6898 ! 


[WILL BE SET UP 
>,HQ TRAP OCCURS 


TO INTERRUPT AND THE INSTRUCTION AT 4$ EXECUTED, IF 
THEN THE TEST MODULE IS FAULT*, WHEN THE TRAP OCCURS 




6899 
6900 










,'THE PC ON THE STACK SHOULD BE 4$, AND ACO, HO AND THE FPS SHOULD NOT 
;HA¥E BEEN MODIFIED. IF EVERYTHING IS CORRECT CORSUB WILL RETURN TO 




6901 
6902 










;5S PLUS TWO, 
j ERROR REPORT 


IF 
AT 


AN ERROR 1$ DETECTED THEN CORSUB WILL RETURN TO THE 
5$, 




6903 
6904 










J NOTE THAT A FLAG, CORFLG, IS SET TO -1 WHEN AN INTERRUPT IS PENDING, 
ICORFLG IS ZERO OTHERWISE, 




6905 
6906 


032646 


005037 


033130 




CORSUB; CLR 




e#CORFLG ?SET FLAG TO INDICATE NO INTERRUPT 




6907 
6908 


032652 


012601 








MQV 




jPENDING. 

(SP)+,Rj ? GET A POINTER TO THE ARGUMENTS, 




6909 
6910 


032654 
032656 


010102 
012700 


000200 






NOV 
MOV 




Rl,R2 ?SET ACO, 
#200, RO 




69U 
6912 


032662 
032664 


170100 
172412 








LDFPS 
LDD 




RO 

(R2),AC0 




6913 
6914 


032666 
032672 


016100 
170100 


000012 






MOV 
LDFPS 




12(R1),R0 ?SET UP THE FPS, 
RO 




6915 
6916 


032674 
032700 


016100 
010102 


000010 






mqv 

MOV 




10(Rl),R0 ?SET UP RO, 
R1,R2 




6917 
6918 


032702 
032706 


062702 
010237 


000014 
001236 






ADD 
MQV 




#14 # R2 

R2,@#$TMP2 jSAVE ADDRESS OF INSTRUCTION IN CASE 




6919 
6920 


032712 


005037 


177776 






CLR 




50F ERROR. 

£#PSW jfCLEAR THE PRIORITY TO ALLOW INTERRUPTS, 




6921 
6922 


0327lt> 
032724 


012777 
012767 


032744 
177777 


000220 
000176 




MOV 
MOV 




*CORTV,§CORTRP JSET UP THE INTERRUPT VECTOR, 
#-1, CORFLG JSET THE FLAG TO INDICATE 




6923 
692 4. _ 


032732 


012777 


177777 


000202 




MOV 




J AN INTERRUPT IS PENDING, 
#-l,$CORINT ? ENABLE THE TEST EQUIPMENT'S 




6925 
6926 


032740 


000161 


000014 






JMP 




; TRAP FUNCTION AND GO 
14(R1) f EXECUTE THE INSTRUCTION, 




6927 
6928 










< 


f TRAP TO HERE 


WHEN THE INTERRUPT OCCURS. 




6929 
6930 


032744 
032750 


005137 
001060 


033130 




CORTVS COM 
BNE 




PiCORFLG ;FIRST SEE IF AN INTERRUPT WAS PENDING. 
C0RTV1 j IF NOT GO REPORT AN ERROR, 




6931 
6Q32 


032752 


012777 


000000 


000162 




MOV 




#0,§CORINT ; MAKE SURE THE TEST EQUIPMENT 

SIS NOT INTERRUPT ENABLED. 




6933 
6934 


03276Q _ 


170204 








$TFP$ 




R4 ! GET THE FPS. 
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6935 


032762 


A 4 1 "J /» 1 

01 1 tOi 


A A A A A A 

000200 




urn/ 
MOV 


# 4iUU , R<e 


7 V?tL 1 *iv w 


6936 


032766 


170102 






r i~\ tt r\ 

LDFP5 


Hi 




69 3/ 


0327 /0 


A 4 UrtO 


j 3 1 J / 


- 


Minu 
f*lU ¥ 




_ _ — _ _ _„„_.___,™_™ — „ 


6938 


032774 


174012 






STD 


AC0# CR2 ) 




6939 


032776 


0127 37 


A 1 "2 4 1 A 

033132 


A A 4 it A 

001240 


u n if 
MO V 


f V.OK IMP #«P#9IMF3 




6940 


033004 


010037 


001244 




NOV* 


R0 r ^# $TMP5 




6941 


033010 


010437 


001250 




_ n tl 

MOV 


H 4 f pfSTWr / 


— — . , — — _ — __ — — — 


^942 


033014 


011637 


001 254 




MOV 


C 5P J r ^# STMP1 1 




6943 


033020 


010102 






MOV 


Rl f R2 


— " - ■ — - ' — ■ — - ... - 


6944 


A •% A A A 

033022 


010237 


001242 




MOV 


R2f $TMP4 




6945 


033026 


062702 


000010 




ADD 


#10, R2 


: _____ 


6946 


033032 


012237 


001 246 




HQV 


* fr> a ^ . Ax. a m y f% t 

(R2) + # ?#$TMP6 




694? 


033036 


0122 37 


A A 4 A C «~ I 

001 252 




kJ A If 

MOV 


C R2 } + f w# $TMP 1 




6948 


033042 


010237 


001256 




MOV 


R2 » @#$TMP1 2 




6949 
6950 


033046 


021602 






ii rt 
CMP 


CSP) f R2 


, r nr r TUX? ITDID C\F* f* IlDOCn 

'SEE If Trie, THAr U^CUKKE*U 
jAT THE CORRECT ADDRESS 9 


6951 
6952 


033050 
033052 


001016 
022626 


— — — — 




SNE 
CMP 


CORTVO 

(SP J+# (SP)+ 


; RESET THE STACK „ 


6953 


/\ 1 1 AC 4 

033054 


A A A A _. * 

020061 


A A A f\ 4 A 

0000 1 





CMP 


R0 f 1 CR1 J 


, Crc TIT DA 1 C ^flDDPPT 

»SEE It* KU io uURRii.Ll# 


6954 


A ^ /V _1 A 

033060 


/\ A 4 A 4 A 

00101 2 








CORTVO 


JpR If NOi wOKREvlt. 


0933 


033092 


010102 






yn If 

MU V 




J_>r.Ki 4." HI«U WAD V*Urvf\C*V + 


6956 


033064 


A 4 "1 A 3 

012703 


033132 




fc_ J*I II 

MOV 


ff COK I Mr |H j 




6957 
6958 


03 30 70 
033074 


ai "5 *t AC 

01*/ 05 
022223 


A A A A A A 

00000% 




MU V 

1$; cmp 


(R2)+, (R3)+ 




6959 


033076 


001003 






6NE 


CORTVO 


•BRANCH IF INCORRECT. 


6960 


0331 00 


A T T A *i 

0775o3 






SOB 


R5 f 1 $ 




6961 


033102 


A A A 4 £.4 

000161 


A A A A 1 *5 

000032 




tun 

JMP 


SI CR 1 J 


Jir C.VLR * 1 riirib lo LUHKtv, I l*1t.N R c. Jl u R N • 


6962 
















6963 


0331 06 


A A A 4 £.4 

000 1 1 


A A A A "i A 

000030 




CQRTVO* jMP 




• r'noDirf t {TT.n_c pa T r. trn cn fin ditdddt FoDno 


6964 
















£ q t e 

6966 


33 1 * * 


a 4 i & n 


QUI 2 JO 




v-ORTV 1 5 mqv 


I SP Ji ?l $1 "r* 


f tin I U I &KKU r J. UvvUKKwU po&JNI int r 
jCORfliG, DID NU1 INDICATE inftl UWtU WAo 


6967 


= — — 


— — 










• p^NnrMC ps-ppirt spurt mis trap 


6968 


A 'a € 4 _ 

0331 1 6 


ft A n ~| 

00503 7 


A. *_» 1 4 ^ A 

0331 30 




f f u 
V-iiK 






6969 


033122 


022626 






CMP 


(SP)tf (SP)+ 




6970 


033124 


104266 






ERROR 


266 




6971 


033126 


000407 






BR 


CORDONS 




6972 
















6973 


033130 


000000 






CORFLG: , WORD 







6974 


033132 


000000 


oooooo 


oooooo 


C0RTMP: . WORD 


0,0,0,0 





6975 033140 000000 



6977 033142 177774 C0RINTS .WORD 177774 J 

6978 J 


;THIS IS THE ADDRESS, 177774, OF THE 
; TEST EQUIPMENT'S STATUS REGISTER. 


6979 ! 

6980 1 


\ THE CONTENTS OF CORINT CAN BE MODIFIED 
fIF THIS STATUS REGISTER'S ADDRESS IS 


6981 i 

6982 033144 0001 10 CORTRPS • WORD 110 ! 


f CHANGED • 

•THIS IS THE ADDRESS OF THE TEST EQUIPMENTS 


6983 1 

6984 ! 


• TRAP VECTOR. LIKE THE STATUS REGISTER'S ADDRESS 
•DESCRIBED IMMEDIATELY ABOVE 


6985 ! 
6986 


5 THIS VECTOR CAN 8E CHANGED, BUT THE 
'CONTENTS OF CORTRP MUST INDICATE THE 


6987 


'CHANGE. 



6989 033146 C0RD0NE j 

69 9 033146 104412 RSETUP ?G0 INITIALIZE THE FPS AND STACK? AND 



MAINDEC 


-1 1-DFFPB-A 


POP 11/34 FPP 


DIAGNOSTIC PART 
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DFFPBA.Pil 


01-NQV~7b 


21 S06 


T22 


INTERRUPT CORRECT FLOWS TEST 


6991 
6992 












j SEE IF THE USER HAS EXPRESSED 

f THE DESIRE TO CHANGE THE SOFTWARE 


6993 
6994 












jVIRTUAL CONSOLE SWITCH REGISTER (HAS 
jTHE USER TYPED CONTROL G? ) • 


6995 
6996 


6997 
6998 


033150 






TST23 J 








6999 
7000 


7001 
7002 








-SBTTL 


END OF 


PASS ROUTINE 




7003 
7004 








J • 


7005 
7006 








? *INCREMENT THE PASS NUMBER ($PASS) 

f#INDICATE £ND*OF*PROGRAM AFTER 1 PASSES THRU THE PROGRAM 


7007 
7008 








?#IF 5Wl2sl INHIBIT TRACE TRAP 
5*IF THERES A MONITOR GO TO IT 




7009 

7010 








J#IF THERE ISN 


•T JUMP TO LOOP 




7011 
70! 2 


033150 

A ^ * C A 

033150 


A A A- A A A 

000004 




SEQP? 


SCOPE 






7013 
7014 


033152 
033156 


005067 
005067 


145724 
1 461 20 




CLR 

f ft 

CLR 


$TSTNM ??ZERP THE TEST NUMBER 

STIME5 j;ZERQ THE NUMBER OF ITERATIONS 


7015 
701b 


033162 
0331bb 


005267 
042767 


146136 

100000 146130 




INC 

bic 


$PASS INCREMENT THE PASS NUMBER 
#100000, $PASS ;;DQN»T ALLOW A NEG # NUMBER 


7017 
7018 


033174 
033176 


005327 

A A A A f\ 4 

000001 




seopct; 


DEC 
♦ WORD 


(PC)* ?;LOOP? 

1 


7019 
7020 


033200 
03 3202 


003074 
0127 37 






BGT 


SDOAGN ? * YES 
tPC)+#GlPC)+ I t RESTORE COUNTER 


7021 
7022 


033204 
033206 


000001 
033176 




$£NDCT: 


.WORD 

SEOPCT 


t 




7023 
7024 


033210 
033214 


104401 
0004JL7 . 


033216 

: : : 




TYPE 
8R 


,65$ JlTYPE ASCIZ STRING 
64$ ? ? GET OVER THE ASCIZ 


7025 
7026 


033234 






J ?65$: 

64$: 


# ASCIZ 


<12><15>/END PASS #/ 


7027 
7028 


033234 


016746 


146064 




MOV 


$PASS#-(SP) !?SAVE SPASS FOR TYPEOUT 

?;TYPE PASS NUMBER IN OCTAL 


7029 
7030 


033240 
._03JJ42 


104403 
. _ 0.0J? . 






TYPOS 
-BYTE 


;?G0 TYPE—OCTAL ASCII 
6 ;;TYPE b DIGITS 


7031 
703? 


033243 
033244 


000 
104401 


033555 




.BYTE 
TYPE 


;?SUPPRESS LEADING ZEROS 
•67$ j : TYPE ASCIZ STRING 


7033 
7034 


033250 


000421 




; ?67$.S 


BR 

,A§CI£ 


66$ ; ; GET OVER THE ASCIZ 
/ TOTAL ERRORS SINCE LAST REPORT / 


7035 
7036 


033314 
033314 


016746 


145572 


66$5 


Mp.V 


$ERTTL,-(SP) 


! JSAVE $ERTTL FOR TYPEOUT 


7037 
7038 


0JJ.120 


104403 






TyPQS-, 




I ; TOTAL NUMBER OF ERRORS IN OCTAL 
f:GO TYPE— OCTAL ASCII 


7039 
7040 


033322 
033323 


006 
000 






# B YTE 
.BYTE 


6 

1 


f ; TYPE b DIGITS 

?, 'SUPPRESS LEADING ZEROS 


7041 
7042 


033324 
033330 


104401 
005067 


001313 
145556 




TYPE 
Ct>P 


# SCRLF 1 
SERTTL ; 


IjTYPE CARRIAGE RETURN / LINE FEED 
' * CLEAR ERROR TOTAL 


7043 
7044 


033334 
033340 


013700 
OOHH 


000042 


SGET425 


MoV 

B£Q 


$#42,R0 5 
SDOAGN 5 


■ ; GET MONITOR ADDRESS 
■ : BRANCH IF NO MONITOR 


7045 
704b 


033342 
_OJL3344 


005046 
01274b 


033352 




CLR 

my ... 


«(SP) ! 
*$CLR.T.«(SP) j 


»; INSURE THE "T" BIT IS CLEAR 
•jSETUP FOR AN RTI or rtt 



MAINDEC 


»1 1 »DFFP8 


*A 


PDP 11/34 FPP 


DIAGNOSTIC PART 
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DFFPBA.PU Oi 


•NOV-76 


215 06 




END OF 


PASS ROUTINE 










7047 
70 4 8 


033350 


000426 








BP. 


$RTRN ! 

: 


* ; GO DO AN RTI OR RTT TO LOAD TmE Pbw 
'fWITH A CLEARED "T" BIT 








7049 
7050 


033352 
033352 


013700 


000042 


....... 


$CLR.T: 


- ■ 

MOV 


@#42,R0 j 


» ; INSURE RO CONTAINS THE MONITORS 








7051 
7052 


033356 
033360 


001405 
000005 








BEQ 
RESET 


$DOAGN 1 


1 j RETURN ADDRESS 
* j CLEAR THE WORLD 








7053 
7.05 4_ 


033362 
033364 


004710 
000240 






$£NDAD: 


JSR 
NOP 


PC,(R0) J 

— , „ — * 


• ;GO TO MONITOR 

• ;SAVE ROOM 


7055 
7056 


033366 
033370 


000240 
000240 








NOP 
NOP 




•?F0R 
' ? ACTi 1 


7057 
7058 


033372 
033372 


104400 






sdoagn: 


TRAP 




••PUSH OLD PSW AND PC ON STACK 


7059 
7060 


033374 
033400 


042716 
032777 


000020 
010000 


145532 




BIG 
BIT 


#20, (SP) 
#B1T1 2, #SftR 


? jCLEAR THE " T M BIT 

? ; RUN tflTH TRACE TRAP? 


7061 
7062 


033406 
033410 


001005 
005167 


000020 




— 


BNE 
COM 


1$ 

STBIT ! 


IjBR IF NO 

r j IS IT TIME FOR TRACE TRAP 


7063 
7064 


033414 
033416 


100402 
05271b 


000020 






BMl 

BIS 


1$ ! 
#20, (SP) S 


r ?BR IF NO 

' ;SET TRACE TRAP 


7065 
7066 


033422 
033426 


012746 
000002 


033430 




i$; 

$RTRN ; 


MOV 
RTI 


#$LOOP,-(SP) S 


>?JUMP TO START OF TEST 

» ;RETURN--THIS IS CHANGED TO 


7067 ! 

7068 J 


* J AN "RTT* IF "RTT" IS A LEGAL 
• J INSTRUCT ION 


7069 
7070 


033430 
033430 


0001 37 






SLOOPS 


JMP 


@(PC)+ ! 


• *, RETURN 








7071 
7072 


033432 
033434 


005034 
000000 






SRTNAD; 

ITBIT; 


• NORD 
,NORD 


LOOP 

• f w T " BIT STATE INDICATOR 








7073 
7074 


033436 


377 
033442 


377 


000 


$enull: 


.BYTE 
• EVEN 


-1,-1,0 ?;NULL CHARACTER STRING 








7075 
7076 










.SBTTL 


SCOPE 


HANDLER ROUTINE 










7077 
7078 










• • ###*#####*#####»####*######*####***###*#########*####*######### 








7079 
7080 










?#THIS ROUTINE 
; #AND LOAD THE 


CONTROLS THE LOOPING OF SUBTESTS* IT NILL INCREMENT 
TEST NUMBER ( $TSTNM) INTO THE DISPLAY REG, (DISPLAY<7 :0>) 








708i 
7082 










j *AND LOAD THE ERROR FLAG (IERFLG) INTO DISPLAY<1 5 S 08> 
J#THE SWITCH OPTIONS PROVIDED BY THIS ROUT I ME ARE S 








7083 
7084 










;*S»H4*1 

j#s*m=i 


LOOP ON TEST 
INHIBIT ITERATIONS 








7085 
7086 










;#SW09s 
?#SW08s 


1 
1 


LOOP ON ERROR 

LOOP ON TEST IN SwR<7;0> 








7087 
7088 










j#CALL 
s* 


SCOPE 


; jSCOPE^IOT 








7089 
7090 


033442 








SSCOPES 














7091 
70^2 


033442 
033444 


104406 
032777 


040000 


145466 


1$! 


CKSWR 
BIT 


#8ITl4,«Sw'R j 


» ? TEST FOR CHANGE IN SOFT-SWR 
'JLOOP ON PRESENT TEST? 


7093 
7094 


033452 


001114 






BNE 

j#####START OF 


SOVER ! 
CODE FOR THE XOR 1 


; ; YES IF SW14sl 
FESTER###f # 


7095 
7Q96 


033454 


000416 






$XTSTR: 


BR 


6$ 


?;IF RUNNING ON THE "XOR" TESTER CHANGE 
f;THIS INSTRUCTION TO A "NOP" (NQP=240) 


7097 
7098 


033456 
033462 


013746 
012737 


000004 
033502 


000004 




MOV 
MOV 


@#ERRVEC#-(SP) 
#5$,i*ERRVEC 


fjSAVE THE CONTENTS OF THE ERROR VECTOR 
f ; SET FOR TIMEOUT 


7099 
7idO 


033470 
_0_33474 


005737 
012637 


177060 






TST 
MOV 


e#!77060 ! 
CSP)+,£#ERRVEC 


i J TIME OUT ON XOR? 

f ; RESTORE THE ERROR VECTOR 


7101 
7102 


033500 
033502 


000463 
022626 






5$: 


BR 
CMP 


SSVLAD 
(SP)*, (SP)+ 


r;G0 TO THE NEXT TEST 

\ jCLEAR THE STACK AFTER A TIME OUT 





MAINDEC 


•11-OFFPB-A 


POP 11/34 FPP 


DIAGNOSTIC PART 
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dffpba.ph 


0l*NOV~76 


21 ;06 




SCOPE HANDLER 


ROUTINE 






7103 
7104 


033504 
033510 


012637 
000423 


000004 

— . . — _ 


— , — 


NOV 
BR 


CSP)+,@#ERRVEC * # RESTORE THE ERROR VECTOR 
7$ ??LOOP ON THE PRESENT TEST 




7105 
7106 


033512 
033512 


032777 


000400 


145420 


6S: ; #####END 
BIT 


OF CODE FOR THE XOR 
#8IT08,§SWR 


TESTER##### 

?;LOOP ON SPEC « TEST? 


t 


7107 
7108 


033520 
033522 


001404 
127767 


145412 


145352 


BEQ 
CMPB 


2$ 

#SWR,$TSTNM 


f ; BR IF NO 

; ; ON THE RIGHT TEST? SWR<7:0> 


t 


7109 
7110 


033530 
033532 


001465 
105767 


145345 




BEQ 

2$: TST8 


SOVER J 
$ ERFLG 


\»,BR IF YES 

; ; HAS AN ERROR OCCURRED? 




7111 
7112 


033536 
033540 


001421 
126767 


145351 


145335 


BEQ 
CMPB 


3$ ; 
SERMAX, SERFLG j 


f s BR IF NO 

f % MAX, ERRORS FOR THIS TEST OCCURRED? 


c 


7113 
7114 


033546 
033550 


101015 
032777 


001000 


145362 


BHI 
BIT 


3$ ! 
#BIT09,§5NR ! 


f 5 BR IF NO 
>jLOOP ON ERROR? 


< 


7115 
7116 


033556 
033560 


001404 
016767 


145324 


145320 


8EQ 

7$; MOV 


4$ ! 
$LPERR,$LPADR j 


r;8R IF NO 

f ; SET LOOP ADDRESS TO LAST SCOPE 




7117 
7118 


033566 
033570 


000446 
105067 


145307 


— - - — - 


BR 

4$: CLRB 


SOVER 
SERFLG 


•;ZERO THE ERROR FLAG 


i 


7119 
7120 


033574 
033600 


005067 
000415 


145502 




CLR 
8R 


STIMES ! 
1$ 5 


* ?CLEAR THE NUMBER OF ITERATIONS TO MAKE 
-;ESCAPE TO THE NEXT TEST 


1 


7121 
7122 


033602 
033610 


032777 
001011 


004000 


145330 


3$S BIT 

BNE 


#BlTli,iSWR i 
1$ J 


f? INHIBIT ITERATIONS? 
\ ; BR IF YES 




7123 
7124 


033612 
033616 


005767 
001406 


145506 




TST 

BEQ 


SPASS j 

i$ s 


fjIF FIRST PASS OF PROGRAM 
?; INHIBIT ITERATIONS 


1 


7125 
7126 


033620 
033624 


005267 
026767 


145260 
145452 


145252 


INC 
CMP 


SICNT S 
$TIMES f $ICNT ! 


f *, INCREMENT ITERATION COUNT 

•?CHECH THE NUMBER. OF ITERATIONS MADE 


€ 


7127 
7128 


033632 
033634 


002024 
012767 


000001 


145242 


8GE 

1$: HOV 


SOVER ; 
#lf$ICNT s 


' % BR IF MORE ITERATION REQUIRED 

» j REINITIALIZE THE ITERATION COUNTER 




7129 
7130 


033642 
033650 


016767 
105267 


000052 
145226 


145432 


MOV 

SSVLADJ INCB 


SNXCNTf STIMES ! 
STSTNM j 


• ?SET NUMBER OF ITERATIONS TO DO 

• j COUNT TEST NUMBERS 


1 


7131 
7132 


033654 
033662 


116767 
011667 


145222 
145220 


145440 


MOVB 

MOV 


$TSTNM,$TESTN ; 
(SP),$LPADR 3 


• :SET TEST NUMBER IN APT MAILBOX 
>?SAVE SCOPE LOOP ADDRESS 




7133 
7134 


033666 
033672 


011667 
005067 


145216 
145406 




MQV 
CLR 


(SP)f$LPERR J 
$ESCAPE j 


•?SAVE ERROR LOOP ADDRESS 

>;CLEAR THE ESCAPE FROM ERROR ADDRESS 




7135 
7136 


033676 
033704 


112767 
016777 


000001 
145172 


145211 
145230 


MOVB 
$OVER; MOV 


§ \ f SERMAX i 
STSTNM, ©DISPLAY j 


» f ONLY ALLOW ONE(l) ERROR ON NEXT TEST 
•DISPLAY TEST NUMBER 


4 


7137 
7138 


033712 
033716 


016716 
000002 


145170 




MOV 
RTI 


$LPADg,(SP) I 


' i FUDGE RETURN ADDRESS 
'jFIXES PS 


C 


7139 
7140 


033720 


000001 






SMXCNT! 1 




>;MAX. NUMBER OF ITERATIONS 




7141 
7142 










.SBTTL ERROR 


HANDLER ROUTINE 




1 


7143 
7144 










• ; 

J*THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 


f 


7145 
7146 










?#SAVE THE ERROR ITEM NUMBER AND 
5 #AND GO TO ERTYPE ON ERROR 


THE ADDRESS OF THE ERROR CALL 




7147 
714$ 











s*THE SWITCH 
:*SW15s5i 


OPTIONS PROVIDED BY 
HALT ON ERROR 


THIS ROUTINE ARE: 


1 


7149 
7150 










J#SW13=1 
s*SW!0=l 


INHIBIT ERROR TYPEQUTS 
BELL ON ERROR 


c 


7151 
7152 










;#SW09=1 

;#CALL 


LOOP ON ERROR 






7153 










?# ERROR 


N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 



_ 7154 . 

1 7155 033722 SERRQRS 

7156 033722 104406 CKSWR ;;TEST FOR CHANGE IN SQFT-SWR 

7157 033724 105267 145153 7$; INCB SERFLG ; jSET THE ERROR FLAG 
i 7 15k 0337 30 QQ1 775 BEQ 7$ ;;DQN'T LET THE FLA G GO TO ZERO 
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DrrpBA.pVt "61 


-NOV- 76 


21S06 




ERROR 


HANDLER 


ROUTINE 






7159 
7160 


033732 
033740 


016777 

032777 


145144 

i-i a -A j-% A A 

002000 


145202 
1 45172 




MOV 
SIT 


$TSTNMf §D I SPLAY 
IBITlOf §5wR 


;;DISPLAY TEST NUMBER AND ERROR FLAG 
•JBELL ON ERROHi 




7161 
7162 


033746 
033750 


001402 
104401 


001 306 






SKQ 

iTi -\r T\ f** 

TYPE 


IS 


??N0 - SKIP 
; ; RING BELiL 


. . 


7163 
7164 


033754 
033760 


005267 
01 1667 


145132 
1451 32 




l$; 


IHC 

kA a™k tf 

MOV 


SERTTL 
(SP) f SERPPC 


J?C0UNT THE NUMBER OF ERRORS 

rJlGET ADDRESS up ERROR JLN&1KUC1IUN 


— - — - • — — — — 


7165 
7166 


033764 
033772 


162767 
1 17767 


000002 
145120 


145124 
1 451 1 4 




SUB 
MQVB 


#2, SERRPC 
@$ERRPC i $ ITEMB 


; ; STRIP AND SAVE THE ERROR ITEM CODE 


— — ^ — - — — 


7167 
7168 


034000 
034006 


032777 

A A 4 AAA 

001004 


020000 


145132 




BIT 
BNE 


#BIT13,@SWR 
20S 


;;SKIP TYPE0UT IF SET 
JfSlvJP JXrEUuliS 


. 


7169 
7170 


034010 
034014 


004767 
1 04401 


002124 

A i% A ^ A A 

001 31 3 






JSR 
TYPE 


PC f ERTYPE 
t $CRLF 


;;G0 TO USER ERROR ROUTINE 




7171 
7172 


034020 
034020 


122767 


000001 


— ■ — — — 

145310 


20$; 


CMPB 


#APTENVf SENV 


?;RUNNING IN APT MODE 




7173 
7174 


034026 
034030 


001007 
116767 


145060 


000004 




BNE 
MQVB 


2$ 

$ ITEMB, 2 1 $ 


;?N0 # $KIP APT ERROR REPORT 

j;S£T ITEM DUMBER AS ERROR NUMBER 




7175 
7176 


034036 
034042 


004767 
000 


000740 




A A A* » 

21$ : 


*JSR 
♦ BYTE 


PCf$ATY4 



? ; REPORT FATAL ERROR TO APT 




7177 
7178 


034043 
034044 


000 
000777 






2 2 $ S 


.BYTE 

BR 




A A A 

22$ 


; ; APT ERROR LOOP 




7179 

7180 


034046 
034052 


005777 
100002 


145066 





2$; 


TST 


@SWR 


; ; HALT ON ERROR 
f?SKIP ir CONTINUE 




7181 
7182 


034054 
034056 


oooooo 

A A jl i A 1 

104406 








HALT 
CKSWR 




? ? HALT ON ERROR i 

JJIEol r UK LnANCyfc. IN our 1 —own 




7183 
7184 


034060 
034066 


032777 
001402 


001000 


145052 


3$: 


BIT 

BEQ 


#8IT09 # #SWR 
4$ 


yjLOOP ON ERROR SWITCH SET? 

. . fin TIT 1 ftt fl 

? | BR If NO 




7185 
7186 


034070 
034074 


016716 
005767 


145014 

A A £f A A. A 

1 45204 




4$ ; 


MOV 
TST 


SLPERR, (SP) 
SESCAPE 


j?FUDGE RETURN FOR LOOPING 

; J CHECK FOR AN ESCAPE ADDRESS 




7187 
7188 


034100 
034102 


001402 
016/16 


1 45176 






BEQ 
MOV 


5$ 

$ESCAPE# (SP) 


; ; BR IF NONE 

j * FUDGE RETURN ADDRESS r OR ESCAPE 




7189 
7190 


034106 
034106 


022737 


033362 


— 1 — 

000042 


5$; 


CMp 


#$ENDAD f §ff 42 


??ACT~11 AUTO-ACCEPT? 




7191 
7192 


034114 
0341 16 


001001 
000000 









BNE 
HALT 


6$ 


? ? BRANCH IF NO 
? ; YES 




7193 
7194 


034120 
034120 


032777 


A A 4 A A A 

001000 


A A C A A -*\ 

1 4501 2 


6$ : 


BIT 




#BIT09# §S#R 






7195 
7196 


034126 
034130 


001013 
011637 


A A A 4 ^ A 

001 162 






BNE 
MOV 


ERM10 

(SP) # l»t$REG0 


JSEE IF ERROR #377 




7197 
7198 


034134 

A ^ i i A A 

034142 


062737 
122777 


177776 

A A A ^ *>• 

000377 


001162 
1 4501 2 




ADD 
CMPB 


#~2,##$REG0 

ii J** a a n A 

# 377# £$REG0 






7199 
7200 


034150 
034152 


001002 
062716 


A A A a A <*\ 

000002 






BNE 

inn 

ADD 


ERMIO 
# 2 f (SP j 






72^1 
7202 


03415b 


000002 






ERMio: 


RTl 








7203 
7204 












SAVE 


AND RESTORE R0-R5 


ROUTINES 





7205 



7207 ! 


f*SAVE R0-R5 


7208 : 


;*CALL; 


7209 i 


f# SAVREG 


7210 ; 


f»UPON RETURN FROM $5AVREG THE STACK tilhh LOOK LIKE: 


7211 ! 


' * 




!*TOP— ( + 16) 


7213 ; 


.# +2— f + 18) 







i 



1 



MAINDF,C»1 1-DFFP6-A 



DFFPBA,P11 
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7215 

721 7 
7218 



7219 



?# + 6 — -R4 
»» t8*»*R3 
,•#+10-— R2 
S#+12---R1 



• # + 14 — -R0 



1 


7221 


034160 






SSAVREG; 










< 


7222. 


034160 


010046 




MOV 


R0,«CSP) ! 


f?PUSH RO 


ON STACK 






7223 


034162 


010146 




MOV 


R1,»(SP) 


?;PUSH Rl 


ON STACK 








7224 


034164 


010246 




MOV 


R2,-CSP) ; 


rjPUSH R2 


ON STACK 






i 


7225 


034166 


010346 




MOV 


R3f($P) j 


» ;PUSH R3 


ON STACK 




< 




722b 


034170 


010446 




MOV 


R4,«(SP) 1 


r;PUSH R4 


ON STACK 








7227 


034172 


010546 




MOV 


R5,«(SP) s 


i ;PUSH R5 


ON STACK 




4 


1 


7228 


034174 


016646 


000022 


MOV 


22CSP) r-(SP) ) 


f;SAV£ PS 


OF MAIN FLOS* 




7229 


034200 


016646 


000022 


MOV 


22(SP),-(SP) S 


>?SAVE PC 


OF MAIN FLOW 






7230 


034204 


016646 


000022 


MOV 


22(SP),-(SP) l 


i ?SAVE PS 


OF CALL 






€ 


7231 
7232 


034210 
034214 


016&46 
000002 


000022 


MOV 
RTI 


22CSP),-CSP) 1 


?jSAVE PC 


OF CALL 




1 




7233 




















i 


7234 








?*RESTORE R0-R5 










A 

I 




7235 








?*CALLS 














7236 








;# RESREG 












€ 


7237 
7238 


034216 
034216 


012666 


000022 


$RESREG: 

MOV 


(SP)+,22(SP) i 


f ; RESTORE 


PC OF CALL 




€ 


€ 


7239 


034222 


012666 


000022 


MOV 


(SP)+,22(SP) ' 


*, ; RESTORE 


PS OF CALL 






7240 


034226 


012666 


000022 


MOV 


(SP)+,22(SP) 


r ; RESTORE 


PC OF MAIN 


FLOW 


t 




7241 
7242 


034232 
034236 


012666 
012605 


000022 


MOV 
MOV 


CSP)+,22(SP) j 
(SP)+,R5 1 


\ j RESTORE PS OF MAIN 
f?P0P STACK INTO R5 


FLOW 




4 


7243 
7*44 


034240 
034242 


012604 
012603 




MOV 
MOV 


C5P)+,R4 ! 
(SP)+#R3 j 


fJPOP STACK INTO R4 
rjPOP STACK INTO R3 




~i 


C 


7245 
7246 


034244 
034246 


012602 
012601 




MOV 
MOV 


(SP)+,R2 

(SP)+,R1 


; ;POP STACK INTO R2 
r?POP STACK INTO Rl 




C 




7247 


034250 


012600 




NOV 


<SP)+,R0 J 


flPOP STACK INTO RO 








7248 


034252 


000002 




RTI 













7249 
725Q 



7251 



» SBTTL 



1 7252 1 


► ; 




7253 J 


>#RQUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE $ ITH A BYTE, 




7254 J 


p #THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 


f 


7255 S 


• *N0TE1 : 


SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER, 




7256 ! 


'*NOTE2; 


SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED • 




7257 ; 


•*N0TE3S 


$FILLC CONTAINS THE CHARACTER TO FILL AFTER, 


c 


7258 ! 


» * 






7259 j 


•*CALL: 








{•!) USING A TRAP INSTRUCTION 


« 


7261 j 


* * 

S*Q,R 


TYPE , MESADR ? ? MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


i 


7263 ; 


r * 


TYPE 


7264 




MESADR 


7265 j 


}# 



12M. 



7267 



034254 
034260 



105767 
100002 



144677 



7269 



034262 
034264. 



000000 
00043 



$TYPE$ 



TSTB 

ll .^ l ^f.jLi.. ■■■ 



$TPFLG 
JLS 



JJIS THERE A TERMINAL? 
s;BR IF YES 



HALT 
BR 



3$ 



; J HALT HERE IF NO TERMINAL 
; ; LEAVE 
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DFFP8A.P1 1 01 


-NOV-76 


21S06 




TYPE ROUTINE 








7271 

7272 


034266 
034270 


010046 
017600 


000002 




1$: MOV 

MOV 


R0,-(SP) 
P2(SP) f RO 




?SAVE RO 

jGET ADDRESS OF ASCIZ STRING 


7273 
7274 


034274 
034302 


122767 
001011 


000001 


145034 


CMPB 
BNE 


*APTENV,$ENV 
62$ 


— 


; RUNNING IN APT MODE 

;N0fGO CHECK FOR APT CONSOLE 


7275 
7276 


034304 
034312 


132767 
001405 


000100 


145025 


BITB 
BEQ 


# APTSPQQL* $ENVM 
62$ 




?SPOOL MESSAGE TO APT 
jNOrGO CHECK r OR CONSOLE 


7277 
7278 


034314 
034320 


010067 
004767 


000004 
000446 


— . — - — _____ 


MOV 
JSR 


RO, 61$ 
PC# $ATY3 




;SETUP MESSAGE ADDRESS FOR APT 
; SPOOL MESSAGE TO API 


7279 
7280 


034324 
034326 


000000 
1 32767 


000040 


1 45003 


61 $ $ .WORD 
62$: BITB 




# APTCSUP# $EN VM 




; MESSAGE ADDRESS 

> i hT fi K\ c! r i f € i i O D D £T 7 C €: T\ 

JAPi CUNSULb v>UFr Kt55ty 


7281 
7282 


034334 
034336 


001003 
1 12046 






BNE 

2$; MQVB 


60$ 

(R0) + # «"(SP) 




;YES f SKIP TYPE OUT 

JPUSH CHARAv,lt.R 1U BE Iirt-U UNAU oiAL^ 


7283 
7284 


034340 
034342 


001005 
005726 






BNE 
TST 


4$ 

(SP) + 




J BR IF IT ISN 1 T THE TERMINATOR 

;IF TERMINATOR POP IT OFr THE STACK 


7285 
7286 


034344 
034346 


012600 
062716 


000002 




60$: MOV 

3$; ADD 


<SP)+,R0 
#2# (SP) 




t RESTORE R0 
jADJUSl RETURN PC 


7287 
7288 


034352 
034354 


000002 
122716 


00001 1 




RTI 

4$: CMPB 


#HT, CSP) 




? RETURN 

• BRANCH IF <HT> 


7289 
7290 


034360 
034362 


001430 
122716 


000200 




BEG 
CMPB 


8$ 

#CRLF# (SP) 


• 

* 


jBRANCH IF NUT <CRLF> 


7291 
7292 


034366 
034370 


001006 
005726 






BNE 
TST 


5$ 

( SP) + 




J POP <CR«*^Lr > Ewui* 


7293 
7294 


034372 
034374 


104401 
001313 






TYPE 
SCRLF 




• 


; TYPE A CR AND LF 


7295 
7296 


034376 
034402 


105067 
000755 


000130 




CLRB 

BR 


SCHARCNT 

2$ 


• 
* 

9 



•CLEAR CHARACTER COUNT 
?GET NEXT CHARACTER 


7297 
7298 


034404 
034410 


004767 
126726 


000056 
144542 




5$: JSR 
6$ : CMPB 


PCt $TYPEC 
$FILLC# (SP) + 


I 


jGO TYPE THIS CHARACTER 

jIS IT TIME FOR FILLER CHARS,? 


7299 
7300 


034414 
034416 


001350 
016746 


144532 





BNE 
MQV 


2$ 

$NULL # »(SP) 




J IF NO GO GET NEXT CHAR, 

;GET # OF FILLER CHARS. NEEDEP 


7301 
7302 


034422 


105366 


000001 




7$5 DECS 


1 t5P) 




; AND THE NULL CHAR, 

; DOES A NULL NEED TO BE TYPED? 


7303 
7304 


034426 
034430 


002770 
004767 


000032 




8LT 
JSR 


6$ 

PC# STYPEC 




?BR IF NO— GO POP THE NULL OFF OF STACK 
;G0 TYPE A NULL 


7305 

7306 


034434 
034440 


105367 
0007 70 


000072 




DECB 
BR 


SCHARCNT 
7$ 




fDO NOT COUNT AS A COUNT 
; LOOP 


7307 
7308 










? HORIZONTAL TAB 


PROCESSOR 






7309 
7310 


034442 


112716 


000040 




8$ 5 MOVB 


#* f(SP) 




; REPLACE TAB WITH SPACE 


7311 
7312 


034446 
034452 


004767 000014 
132767 000007 


000052 


9$ 5 JSR 
BITB 


PC, $TYPEC 
# 7 f SCHARCNT 




; TYPE A SPACE 
^BRANCH IF NOT AT 


7313 
7314 


034460 
034462 


001372 
005726 






BNE 
TST 


9$ 

(SP) + 




•TAB STOP 

;POP SPACE OFF STACK 


7315 
7316 


034464 
034466 


000724 
105777 


144456 




BR 

STYPEC : TSTB 


2$ 

#$TPS 




? GET NEXT CHARACTER 

;WAIT UNTIL PRINTER IS READY 


7317 
7318 


034472 
034474 


100375 
116677 


000002 




144450 


BPL 
M0V8 


STYPEC 
2(SP) i @$TP8 




?LOAD CHAR TO BE TYPED INTO DATA REG, 


7319 
7320 


034502 
034510 


12276& 
001003 


000015 


000002 


CMPB 
BNE 


#CR»2(SP) 
1$ 




jlS CHARACTER A CARRIAGE RETURN? 
? BRANCH IF NO 


7321 
7322 


034512 
034516 


105067 
000406 


000014 




CLRB 
BR 


SCHARCNT 

STYPEA 




;YES— CLEAR CHARACTER COUNT 
JEXIT 


7323 
7324 


034520 
034526 


122766 
00*402 


00001 2 


000002 


1$: CMPB 
BEQ 


*LF,2(SP) 

STYPEX 


?jIS CHARACTER A LINE FEED? 
BRANCH IF YES 


7325 
7326 


034530 
034532 


105227 
000000 






INCB 
SCHARCNT? .WORD 


(PC)* 





;C0UNT THE CHARACTER 
;CHARACTER COUNT STORAGE 



4 
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TYPE ROUTINE 



7327 

ma. 



034534 000207 



STYPEX: RTS 



PC 



7329 
7J3JL 



+ .SBTTL BINARY TO OCTAL (ASCII) AND TXPE 



7331 



7354 





► •#########**##*##**###*##*###** #***^ 


7333 
7334 


;*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT 
f fcOCTAL (ASCII) NUMBER AND TYPE IT. 


7335 : 

7336 J 


?*$TYPQS— ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TXPE 
J#CALLJ 


7337 1 

7338 ! 


!# MQV NUM,-(SP) J 
■# TYPOS ! 


• ; NUMBER TO BE TYPED 
' ; CALL FOR TYPEOUT 


7339 j 

7340 ! 


?* .BYTE N ; 
?* • BYTE M 


j;N = l TO 6 FOR NUMBER OF DIGITS TO TYPE 
i;Msl OR 


7341 J 

7342 ) 


?;1=T¥PE LEADING ZEROS 
ft ? ;0=SUPPRESS LEADING ZEROS 


7343 ! 

7344 ! 


» # 

l*$TYPON — -ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 


7345 S 

7346 J 


!*$TYPQS OR STYPOC 
!#CALL: 


7347 S 

7348 J 


'* MOV NUM,~(SP) J ? NUMBER TO BE TYPED 
># TYPON ? jCALL FOR TYPEOUT 


7349 1 

7350 J 


* 

?*$TYPQC — ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 


7351 j 

7352 J 


#C ALL • 

•* MOV NUM,«»(SP) ; ; NUMBER TO BE TYPED 


7353 J 


»* TYPOC ??CALL FOR TYPEOUT 



€ 


7355 


034536 


017646 


000000 




STYPQSS 


MOV 


P(SP)#-(SP) 


J?PICKUP THE MODE 




7356 


034542 


116667 


ooooot 


000211 




MOVB 


1(SP),$0FILL 


??LOAD ZERO FILL SWITCH 




7357 


034550 


112667 


000207 






MOVB 


(SP)+,$OMOD£+! 


; ; NUMBER OF DIGITS TO TYPE 


1 


7358 


034554 


062716 


000002 






ApD 


#2, CSP) 


} Jf ADJUST RETURN ADDRESS 




7359 


034560 


000406 








BR 


STYPON 






7360 


034562 


112767 


000001 


000171 


STYPOC! 


MOVB 


#l,$OFILL 


??SET THE ZERO FILL SWITCH 


f 


7361 


034570 


112767 


000006 


000165 




MOVB 


#6, SOMODE+l 


??SET FOR SIX(6) DIGITS 




7362 


034576 


112767 


000005 


000154 


stypon: 


MOVB 


#5,$OCNT 


J ; SET THE ITERATION COUNT 




7363 


034604 


010346 








MQV 


R3, -(SP) 


SISAVE R3 


1 


7364 


034606 


010446 








MOV 


R4,«(SP) 


?JSAVE R4 




7365 


034610 


010546 








MOV 


R5,-(SP) 


JJSAVE R5 




7366 


034612 


116704 


000145 






MOVB 


$QMOD£+lf R4 


? ? GET THE NUMBER OF DIGITS TO TYPE 


1 


7367 


034616 


005404 








NEG 


R4 






7368 


034620 


062704 


000006 






ADD 


#6,R4 


? -SUBTRACT IT FOR MAX. ALLOWED 


1 


7369 


034624 


110467 


000132 






MOVB 


R4 f $OMODE 


j ? SAVE IT FOR USE 


7370 


034630 


116704 


000125 






MOVB 


SOFILLr R4 


S ; GET ThE ZERO FILL SWITCH 




7371 


034634 


016605 


000012 






MOV 


12(SP),P5 


J JPICKUP THE INPUT NUMBER 




7172 


034640 


005003 








CLR 


R3 


; t CLEAR THE OUTPUT WORD 


t 


7373 


034642 


006105 






1$: 


ROL 


R5 


? ? ROTATE MSB INTO "C" 




7374 


034o44 


000404 








BR 


3$ 


j;GO DO MSB 




7375 


034646 


006105 






2$; 


ROL 


R5 


5JFORM THIS DIGIT 


1 


7376 


034650 


006105 








ROL 


R6 


• 




7377 


034652 


006105 








ROL 


RS 






7378 


034654 


010503 








MQV 


R5,R3 




I 


7379 


034656 


006103 






3$S 


ROL 


R3 


j ; GET LSB OF THIS DIGIT 




73«0 


.034660 


105367 








-fi£CJ& .... 


SOMODE 


s:TYPE THIS DIGIT? 


1 


7381 


034664 


100016 








BPL 


7$ 


• ; BR IF NO 


7382 


. 03466.6 


042703 


177770 






BIC 


#177770 # R3 


; t GET RID OF JUNK 



A 



MAINDFC 


-il*0FFPB 


*A 
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DFFPBA.PU 01 


•NOV" / 1> 


215 06 


BINARY 


TO OCTAL 


lASCIlJ ANU IlHL 








7383 

"t "i a A 

7384 


034672" 
034674 


A A 4 A ft T 

001 002 
005704 




- - 


BNE 
TST 


*t S 
R4 


J J I OP 1 r UK U 

? j SUPPRESS THIS 0? 






7385 
7386 


034676 
034 700 


001 403 
005204 




4$ ; 


BEQ 
INC 


5$ 
R4 


• ; fcSK if I iLo 

SjDON'T SUPPRESS ANYMORE 0'S 






7387 
7388 


034702 

A ^ >i *> A _ 

034 /06 


ft C O *7 ft "3 

052703 
052703 


000060 
000040 


bS * 


BIS 

q t e 

815 


* 1 A El 

#» ,R3 


• • u it t r tuic niriT ncnr t 
JJMAKE lnio Ulvjll AoLii 

?;MAKE ASCII IF NOT ALREADY 






7389 

7 3> ^ 


034712 
034716 


1 1036' 
i 044Q1 


ft A A ft A A 

000040 
034756 




MQV8 
TYPE 


R3 # oS 
f 8$ 


• • C A If IT CflD TVDTlir 

jjGQ TYPE THIS DIGIT 


_, . 




7391 
7392 


034722 
03472$ 


4 AC It 1 

10346 / 
003347 


A A A A "i O 

000032 


7$; 


DECS 


* <1 ii *T1 

§UCN X 

2$ 


; ? BR IF MORE TO DO 






7393 
7394 


034730 
034732 


A A *^ A A *1 

002402 
005204 







BLT 
INC 


6$ 
R4 


..on t e- nniic 
•JfcjK ir UUriH. 

?;INSUR£ LAST DIGIT ISN'T A BLANK 






7395 
7396 


034734 
034736 


000744 
012605 




6s : 


BR 
MOV 


2S 

CSP)+,R5 


m mf*n r\ n tuc i act r \ T r t t 
; ; bU uu inc. uAoi 

??REST0PE R5 






7397 
7398 


034740 
. 03 4 7 4? 


012604 
JOL2603 






MQV 

MQV 


(SP)+,R4 
(SP)+,R3 


t # RES IORE R4 
t ; RESTORE R3 






7399 

*l A i"*A 


034744 


016666 
012616 


y% /\ /\ /\ ft "*V /\ A /\ /I 

000002 000004 




MOV 
MOV 


I (Sr) # 4(SP) 
(SP)+# (SP) 


* r SE 1 I nC, 51AC«V r UK KLiUKNiNb 






7401 
7402 


034754 
034756 


000002 
000 


... 


9 • 


RTI 

li V TP 





J J Kfc, 1 UKN 

; f STORAGE FOR ASCII DIGIT 






7403 
7404 


034757 
034760 


Aft A 

000 




$ocnt; 


• BYTE 

n V T £ 


A 




• « TtrRMThlATflR F*OR TYPF RfllfTT'NF 

; J0CTAL DIGIT COUNTER 






7405 
7406 


034761 
034762 


000 
000000 




$0FILL? 
$0H0DE; 


^ IT 1* H# 
. WORD 






??ZER0 FILL SNITCH 

* f ; NUMBER OF DIGITS TO TYPE 







7407 

7408 ,SBTTL APT COMMUNICATIONS ROUTINE 



7409 

7410 ' » *»♦»»»» »##»»»»»»»»»»♦»»»»»»»»»»»»»»»»»»»»»»###»»»»»*»» 



7411 


034764 


112767 


000001 


000236 


SATYl 5 


HQVB 


#!,$FFLG 


?;T0 REPORT FATAL ERROR 


7412 


034772 


U2767 


000001 


000226 


$ATY 3 : 


HOVB 


§1, $MFLG 


j j TO TYPE A MESSAGE 


7413 


035000 


000403 








BR 


$ATYC 




7414 


035002 


112767 


000001 


000220 


SATY4; 


MOVB 


#!# $FFLG 


; jTO ONLY REPORT FATAL ERROR 


7415 


035010 








SATYC? 








7416 


035010 


010046 








MOV 


R0,~CSP) 


;;PUSH R0 ON STACK 


7417 


035012 


010146 








MOV 


Rl f -(SP) 


;?PUSH Rt ON STACK 


7418 


035014 


105767 


000206 






TSTB 


SMFLG 


;;SHOULD TYPE A MESSAGE? 


7419 


035020 


001450 








BEQ 


5$ 


;;IF NOTS SR 


7420 


035022 


1227&7 


000001 


144306 




CMPB 


#APTENV,$ENV 


7 OPERATING UNDER APT? 


7421 


035030 


001031 








BNE 


3$ 


??IF NOT • BR 


7422 


035032 


132767 


000100 


144277 




BITB 


# APTSPOQLr SENVM 


; ; SHOULD SPOOL MESSAGES? 


7423 


035040 


001425 








BEQ 


3$ 


?fIE NOT S BR 


7424 


035042 


017600 


000004 






MOV 


$4(SP),R0 


j ? GET MESSAGE ADDR. 


7425 


035046 


062766 


000002 


000004 




ADD 


#2,4(SP) 


; ;BUMP RETURN ADDR. 


7426 


035054 


005767 


144236 




IS: 


TST 


SMSGTYPE 


??SEE IF DONE W/ LAST XMISSION? 


7427 


035060 


001375 








BNE 


1$ 


J?IF NOTS WAIT 


7428 


035062 


010067 


144244 






MOV 


R0,$MSGAD 


? ?PUT ADDR IN MAILBOX 


7429 


03506& 


105720 






2$; 


TSTB 


(R0) + 


j ; FIND END OF MESSAGE 


7430 


035070 


001376 








BNE 


2$ 




7431 


035072 


166700 


144234 






SUB 


SMSGAD f R0 


; ; SUB START OF MESSAGE 


7432 


035076 


006200 








ASR 


R0 


yjGET MESSAGE LNGTH IN WORDS 


7433 


035100 


010067 


144230 






MOV 


R0# $MSGLGT 


;;PUT LENGTH IN MAILBOX 


7434 


035104 


012767 


000004 


144204 




MOV 


#4 # $MSGTYPE 


; ; TELL APT TO TAKE MSG. 


7435 


035112 


000413 








BR 


5$ 




7436 


035114 


017667 


000004 


000016 


3$: 


MOV 


$4(SP),4$ 


j;PUT MSG ADDR IN JSR LINKAGE 


7437 


035122 


062766 


000002 


000004 




ADD 


#2# 4CSPJ 


J J BUMP RETURN ADDRESS 


7438 


.035130 


016746 


142642 






MOV 


177776,-(SP) 


jjPUSH 177776 ON STACK 





MAIM DEC 


»! 1«DFFP6»A 
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DFFP8A # P11 01 


-NOV-76 


21506 




APT COMMUNICATIONS ROUTINE 






: r— - 

E 


l _ 


7439 
7440 


035134 
035140 


004767 
000000 


177114 






JSR 
. WORD 


PC » $TypE 




?:CALL TYPE MACRO 




1 




7441 
7442 


035142 
035142 


105767 


— 

000062 





5$: 
10$; 


TSTB 


$FFLG 


. — . . . 

$ ; SHOULD REPORT FATAL ERROR? 






f 


7443 
7444 


035146 
035150 


001416 
005767 


144162 






8EQ 
TST 


12$ 
$ENV 


;?IF not: BR 

; ; RUNNING UNDER APT? 




4 




744$ 
7446 


035154 
035156 


001413 
005767 


144134 


— — — 


11S; 


BEQ 
TST 


12$ 

SMSGTYPE 


j ; IF NOT: BR 

; -FINISHED LAST MESSAGE? 




4 




7447 
7448 


035162 
035164 


001375 
017667 


000004 


144126 




8NE 
MOV 


11$ 

i4(SP),$FATAL 


j;IF not; WAIT 
; ; GET ERROR # 






# 


7449 
7450 


035172 
035200 


062766 
005267 


000002 
144112 


000004 




ADD 
INC 


# 2, 4(SP) 
$MSGT¥PE 


JJBUMP RETURN ADDR. 
9 9 TELL APT TO TAKE ERROR 




4 


4 


7451 
7452 


035204 
035210 


105067 
105067 


000020 
000013 




12$: 


CLRB 
CLRB 


$FFLG 
$LFLG 


9 yCLEAR FATAL FLAG 
; ;CLEAR LOG FLAG 




1 




7453 
7454 


035214 
035220 


105067 
012601 


000006 






CLRB 
MOV 


SMFLG 
(SP)+,R1 


9 9 CLEAR MESSAGE FLAG 
j;POP STACK INTO Rl 






4 


7455 
7456 


035222 
035224 


012600 
000207 


. 






NOV 
RTS 


(SP)+,RO 
PC 


?*POP STACK INTO RO 
9 9 RETURN 




C 


€ 


7457 
7458 


035226 
035227 


000 
000 






$HFLGs 
$LFLG; 


,BYTE 
• BYTE 






jjMESSG. FLAG 
••LOG FLAG 




1 




7459 
7460 


035230 


000 
035232 






SFFjbG; 


• BYTE 

• EVEN 





9 9 FATAL FLAG 






1 


7461 
7462 




000200 
000001 






APTSIZE 

APTENVs 


= 200 
001 








€ 


4 


7463 
7464 




000100 
000040 






APT3POOL=IOQ 
APTCSUPS040 








i 




7465 
7466 










„ S8TTL 


TT¥ INPUT ROUTINE 








I 


7467 
7468 














i 


1 


7469 
7470 










„ENABL 


LSB 








i 




7471 
7472 




_ — . 







• • *>t 

?*SOFTWARE SWITCH REGISTER CHANGE ROUTINE, 






4 


7473 
7474 










j#ROUTINE IS 
!#SERVIC£ THE 


ENTERED FROM THE 
TEST FOR CHANGE 


TRAP HANDLER, AND WILL 

IN SOFTWARE SWITCH REGISTER TRAP CALL 




< 


4 


7475 
7476 


035232 


022767 


000176 


143700 


?*WHEN 
$CKSWRS 


OPERATING IN TTY FLAG 
CMP #SWREG,SWR 


MODE, 

??IS THE SOFT-SWR SELECTED? 




A 




7477 
7478 


035240 
0.25J42 


001074 
105777 


143676 






BNE 

TSTB 


15$ 
% $ TKS 


J 9 BRANCH IF NO 
? jCHAR THERE? 






< 


7479 
7480 


035246 
035250 


100071 
1*7746 


143672 






BPL 
JiJpVB 


15$ 

e$TKB,-(SP) 


j;IF NO* DON'T WAIT AROUND 
J ; S AVE THE CHAR 




4 


4 


74B1 
7482 


035254 
0.35260 


042716 
02272$ ... 


177600 
JL0Q.007 






BIC 
CMP 


#*C177 f (SP) 
*7U5PJJL 


?jSTRIP-OFF THE ASCII 
; ;IS IT A CONTROL G? 




4 




7483 
7484 


035264 
Q35266 


001062 

JL2671I__ 


141642 


oooooi 




BNE 
CMPB 


15$ 

$AUT06 # .f 1 ... 


; ; NOf RETURN TO USER 

; : ARE WE RUNNING IN AUTO-MODE? 






4 


7485 
7486 


035274 


00145b 








BEQ 


15$ 


9 9 BRANCH IF YES 




4 


1 


7487 
7488 


03527b 
035302 


104401 
104401 


035641 
03564.6 




SGTSWR; 


TYPE 
T¥PE 


,$CNTLG 
,$MSWR 


• « ECHO THE CONTROL-G (%) 

?;T¥PE CURRENT CONTENTS 




1 




7489 
7490 


035306 
035312 


016746 
104402 


142664 






NOV 
TXPOC 


SWR£G,-(SP) 


??SAVE SWREG FOR TYPEOUT 

9 ;GO TYPE— OCTAL ASCI I (ALL DIGITS) 






4 


7491 
74?2 


035314 
035320 


104401 
00*046 


035657 




L?JL?__ 


T¥P£ 
CLR 


,$MNEW 
»{SP) 


9 9 PROMPT FOR NEW SWR 
j s CLEAR COUNTER 




4 


< 


7493 
7494 


035322 
035324 _ 


005046 
101777 


143614 




7SS 


CLR 
TSTB 


-CSP) 

^$TKS 


; ; THE NEW SWR 
jjCHAR THERE? 




f 
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7495 


035330 


100375 








BPL 


7$ 


j;IF NOT TRY AGAIN 


7496 




_ — 















7497 


035332 


1 1 7746 


1 43610 






MQVB 




J J PICK UP CHAR 


7498 


035336 

— - — — ___ 


042716 


1 77600 






BIC 


# C 1 7 7 # ( SP ) 


JJMAKE IT 7»BIT ASCII 


7499 
7500 


___ _ 






— — — 








7501 
7502 


035342 


021627 


000025 





9$ : 


CMP 


(SP) # #25 


; ; IS IT A CQNTRQL-U? 


7503 


035346 


A A 4 At A __T 

001005 








BNE 


4 A. A 

10$ 


• ; BRANCH lr NUI 


7504 


035350 


104401 


A ^ fi_ _: ^ A 

035634 






TYPE 


, $CNTLU 


* * X ES # ELHU CUNlHUti-U ( U) 


7505 


035354 


A. __ Ai. 

062706 


000006 




A A A _ 

20$ J 


ADD 


If 6 # SP 


J j IGNORE PKEVXUUS INPUT 


7506 


035360 


A A A "f ^ 

000757 








BR 


19$ 


*;LET f S TRY IT AbAAN 


7507 


















7508 


















7509 


035362 


021627 


000015 




10$: 


CMP 


(SP)##15 


? ; IS IT A <CR>? 


7510 


035366 


001022 








BNE 


16$ 


J J BRANCH IF NO 


7511 


035370 


005766 


000004 






TST 


4(SP) 


J?YES| IS IT THE FIRST CHAR? 


7512 


035374 


001403 








BEG 


1 1 $ 


? ; BRANCH IF YES 


7513 


035376 


016677 


000002 


143534 




MOV 


2($P> # «SWR 


j j SAVe, NEW SwR 


751 4 


035404 


062706 


000006 




lis* 


ADD 


#6f SP 


• •Irenes ifr» entii^i/ 

••CLEAR UP STACK 


7515 
7516 


035410 
03541 4 


104401 
126727 


A A 4 A 4 "_ 

001 31 3 
143515 


A A A. A A 4 

000001 


14$; 

: 


re. 
CMPB 


f $CRlir 

$ 1 NTAG f # 1 


JJELHU <>wK> ANU <l»r > 

f ? RE*EN AoyE 111 nnu INlt»KHUrl5r 


7517 


035422 


A A 4 A A > 

001 003 








BNE 




fjoBANLn lr NUI 


7518 


035424 


012777 


A A A 4 A A 

000100 


143512 




MOV 


# 1 00f @$TKS 


* J RENEWABLE TTY KBD INTERRUPTS 


7519 


035432 


000002 






15$ ; 


RTI 




; ; RETURN 


7520 


035434 


004767 


177026 




16$? 


JSR 


PCf $T YPEC 


? ? ECHO CHAR 


7521 


A ^ fl_ A A A 

035440 


021627 


000060 






CMP 


(SP) f #60 


— . A ri X n ^ a 

j ; CHAR < 0? 


7522 


035414 


A A ="% A A A 

002420 








blt 


4 Q A 

18$ 


;?BRANCH IF x ES 


7523 


035446 


021627 


000067 






CMP 


(SP) i #67 


J ; CHAR > 7 ? 


7524 


035452 


003015 








BGT 


18$ 


j ; BRANCH lr YES 


7525 


035454 


042726 


A; A A A __ A 

000060 






BIC 


#60# (SP) ♦ 


jjSTRIP"OrF ASCII 


7526 


A ^ f_ if __ A 

035460 


005 766 


000002 






TST 


2 ( SP ) 


a > T t.' mute H LI C C- T O C T Li A O 

?|IS THIS THE rlRST CHAR 


7527 


035464 


A A 4 A A "1 

001403 








BEQ 


17$ 


JJoKANLH IP IE© 


7528 


035466 


0063 16 









ASL 


( SP ) 


, , t;n CUT PT BnPCPIliT 

;;NU# SHIrT rRESENl 


7529 


035470 


00631 6 








ASL 


( SP ) 


CHAK UVEK IU WAKE 




U J 5 * / «? 


y ye 3 1 o 








A £3 I 

flk£>li 


/fill 

( SP J 


• • Dm im FnD Kiiru nuir 
;J KUUW rUH Nc*W UyifL m 


7531 


035474 


005266 


000002 




17$; 


INC 


2(SP) 


;?KEEP COUNT OF CHAR 


7532 


035500 


056616 


17777b 






BIS 


-2(SP), (SP) 


?;SET IN NEW CHAR 


7533 


035504 


000707 








BR 


7$ 


J J GET THE NEXT ONE 


7534 


035506 


104401 


001312 




18$ s 


TYPE 


,$0UES 


;;TYPE ?<CR><LF> 


7535 


035512 


000720 








BR 


20$ 


JJSIMULATE CONTROL-U 


7536 










.DSA8L 


LSB 







7537 

7538 

7539 ; •##♦#»##########♦####♦#####*#########♦*#♦###♦##*##**##*##♦#*#### 

7540 ;»THIS ROUTINE WXljL INPUT A SINGLE CHARACTER FROM THE TTY 

7541 ;*CALL; 

7542 ;» RDCHP INPUT A SINGLE CHARACTER FROM THE Tti 

7543 J * RETURN HERE ? ; CHARACTER IS ON THE STACK 

7544 ?_* JJ_WI TH PARITY BIT STRIPPED OFF 

7545 

7546 . . 

7547 035514 011O46 $RDCHR; MQV (SP) * -(SP) ??PUSH DOWN THE PC 

7548 035516 016666 000004 000002 . MOV 4(SP), 2(SP ) ;;SAVE THE PS 

7549 035524 105777 143414 1$; TSTB 3$TKS J?WAIT FOR 

7550 035530 10037 5 BPL IS j:A CHAR ACT E R 
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7551 


035532 


1 17 766 


143410 


000004 




MQVB 


i$TKB # 4(SP) 




*, READ THE TTY 


7552 


035540 


042766 


177600 


000004 




BIC 


#~C<177> # 4($P) 3 




? GET RID OF JUNK IF hHX 


7553 


035546 


026627 


000004 


000023 




CMP 


4(SP) # #23 3 




F 1 S IT A CONTROL-S? 


7554 


035554 


001013 








BNE 


3$ ! 




\ BRANCH IF NO 


7555 


035556 


105777 


143362 


._ _. . _. 


2$: 


TSTB 


@$TKS j 




} WAIT FOR A CHARACTER 




035562 


190375 








8PL 


2$ 




fLOOP UNTIL ITS THERE 


7557 


0355&4 


117746 


143356 






MOVB 


<3$TKB,-(SP) J 




; GET CHARACTER 


7558 


035570 


042716 


177600 






SIC 


#*C177,($P) j 




; MAKE IT 7-BIT ASCII 


w i* 7 


035574 


022627 


000021 






CMP 


(SP) + f #21 J 




f IS IT A CQNTRQL-Q? 


7560 


035600 


001366 








BNE 


2$ ! 




fIF NOT DISCARD IT 


7561 


035602 


000750 








BR 


1$ J 




? YES, RESUME 


7562 


035604 


026627 


000004 


000140 


3$s 


CMP 


4CSP),#!40 j 




fIS IT UPPER CASE? 


7563 


035612 


002407 








BLT 


4$ J 




; BRANCH IF YES 


7564 


035614 


026627 


000004 


000175 




CMP 


4(SP)f#l75 ; 




llS IT A SPECIAL CHAR? 


7565 


035622 


003003 








BGT 


4$ J 




', BRANCH IF YES 


7566 


035624 


042766 


000040 


000004 




BIC 


#40,4(SP) ; 




f MAKE IT UPPER CASE 


7567 


035&32 


000002 






4$; 


RTI 






pGO BACK TO USER 


7568 


035634 


052536 


005015 


000 


$CNTLU: 


. ASCIZ 


/-U/<15><12> j 




^CONTROL "U" 


7569 


035641 


136 


006507 


000012 


SCNTLG: 


.ASCI'2 


/*G/<15><12> J 




f CONTROL *G M 


7570 


035646 


005015 


053523 


020122 


SMSwR? 


.ASCIZ 


<15><12>/8WR s / 




7571 


035654 


020075 


000 












7572 


035657 


040 


047040 


053505 


SMNEW : 


• ASC 1 2» 


/ NEW ^ / 




757 3 


035664 


036440 


000040 












7574 



















7575 
7576 



•SBTTL TRAP DECODER 



7577 
7578 



g»THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE "TRAP* INSTRUCTION 



757* 

J33JL 



j#AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
;»OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT KI LL 



7581 



?#GO TO THAT ROUTINE, 





7S83 
7584 


035670 
035672 


010046 
016600 


000002 


strap: hov 

MOV 


RO,-(SP) 3 
2(SP),R0 1 


USAVE RO 

1 *, GET TRAP ADDRESS 


f 


7585 
7586 


035676 
035700 


005740 
1U000 




TST 
MOVB 


-CRO) 

(RO)fRO i 


fjBACKUP 8Y 2 

\ ;GET RIGHT BYTE OF TRAP 




7587 


035702 


006300 




ASL 


RO J 


;?POSITION FOR INDEXING 


1 


7588 


035704 


016000 


035724 


MOV 


$TRPAD(RO),RO ! 


1 ? INDEX TO TABLE 




7589 


035710 


000200 




RTS 


RO \ 


(JGO TO ROUTINE 




7590 














4 


7591 
7592 








JJTHIS IS USE TO 


HANDLE THE ■GETPRI" MACRO 


1 


7593 
7594 


035712 


011646 




$TRAP2: MOV 


(sp)#-(sp) : 


•?MQVE THE PC DQWN 




7595 


035714 


016666 


000004 000002 


MOV 


4(SP),2(SP) ??MOV£ THE PSW DOWN 




7596 


035722 


000002 




RTI 


? ; RESTORE THE PSW 


« 


7597 
















7598 








•SBTTL TRAP TABLE 




t 


7599 
7600 








J*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 




76Q1 








;*BY THE "TRAP" 


INSTRUCTION # 






7692 














i 


7t>03 
7604 








? ROUTINE 






1 


7605 
7606 


035724 
035726 


035712 
034254 




STRPAD i .WORD 
STYPE 


STRAP2 

?;CALLsTYPE TRAP+ 1 C 1 0440 1 ) TTY TYPEOUT ROUTINE 



HAINPEC-UHPFFPB-A 
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TRAP TABLE 



7607 

7608 



0357 30 
035732 



034562 
034536 



7609 

JLSlLHl 



035734 034576 



$TYPOC 
STYPQ S 
STYPON ? jCALLsTYPON 



; ;CALL=TYPOC 
? ICALL-TYPOS 



TRAP + 2U04402) 
TRAP+3C104403) 



TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
T*PE OCTAL NUMBER (NO LEADING ZEROS) 



TRAP+4( 104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 



7611 
7612 



035736 035302 



$GTSWR J ?CALL=GTSWR 



TRAP+5C 104405) GET SOFT-SWR SETTING 



7613 
7614 



035740 
035742 



035232 
035514 



SCKSWR 

SRDCHR 



J ?CALL=CKSWR 
; ?CALL s ROCHR 



TRAP+6(104406) 
TRAP+7C104407) 



TEST FOR CHANGE IN SOFT-SWR 
TTY TXPEIN CHARACTER ROUTINE 



7615 
7616 



035744 
035746 



034160 
034216 



$SAVR6G ; ;CALL-SAVREG 

SRESREG ?; CALLsRESREG 



TRAP+10C104410) SAVE R0-R5 ROUTINE 
TRAP + 1H104411) RESTORE R0-R5 ROUTINE 



7617 
7618 



035750 
035752 



036710 
036702 



•RSET ; JCALL-RSETUP 
.LPKR * iC ALL^LPERR 



TRAP + 12U04412) ROUTINE TO INITIALIZE AFTER EVERY TEST 
TRAP+13(104413) ROUTINE TO SET LOOP ON ERROR ADDRESS 



7619 

■7620 



000030 



$ TERMs ,*$TRP AD 



7621 
7622 



.SBTTL POWER DOWN AND UP ROUTINES 



7623 



• j *#»*#«««**»#***#****#««#*****»#***»***##* *#####**#*#*####*♦#### 





*I iL ^ C 

7625 


035 /5§ 


01 1 I 3 i 


03©1 Si 


A A A A *i A 

000023 


SPWRPN; 


MOV 


#$ILLUP,§#PWRVEC 


J ?SET 


FOR FAST UP 




1. 


7626 


035762 


012737 


000340 


ft A ft A A £. 

000026 




MOV 


#340#§#P*RVEC+2 ? 


IPRIO 


:7 


1 




7627 


035770 










MOV 


R0,-(SP) i 


?PUSH 


RO ON STACK 






7628 


0357 11 


010146 








MOV 


R1,-CSP) 


; PUSH 


Rl ON STACK 




41 

1.. 


*T i, cx 

/ 649 


So f t 4 


03.0*40 








MOV 


P2,-(SP) * 


?PUSH 


R2 ON STACK 


g 




7630 


035776 


010346 








MOV 


R3,-C5P) ? 


% PUSH 


R3 ON STACK 






toil 


o ioooo 


A 4 A A A ft, 








MOV 


R4,»(5P) ? 


JPUSH 


R4 ON STACK 




1 


7632 


3600* 


A 4 A C A fe. 

01 05% 








MOV 


R5,-(SP) ? 


IPUSH 


R5 ON STACK 


g 




/633 


5PVUt 


A 4 "? *7 A K 

01 1 f 40 


1 4 J I iO 






MOV 


iSWR # -(SP) 


I PUSH 


eSWR ON STACK 






76 34 


036010 


1 066 / 


0001 22 






MOV 


SP*$SAVR6 ? 


?SAVE 


SP 




1' 




V JwUl'l 


A 4 7 T 7 




A A AAO d 




MOV 


#$P^RUP,a#pWRVEC 


j;SET 


UP VECTOR 


g 




7636 


036022 


000000 








HALT 










1 


7637 
7638 


036024 


000776 








BR 


• -2 ? 


; HANG 


UP 






7639 










; •»#*#######*###♦######♦*##****#♦####*######«#*##*♦#####*###****# 






7640 










SPOWER 


UP ROUTINE 








< 


7641 


036026 


012737 


036132 


000024 


$PWRUP? 


MOV 


#$ILLUP,g#PtfRVEC 


; ?SET 


FOR FAST DOWN 


1 




7642 


036034 


0JLfe7Q6 


000076 






MOV 


$SAVR6,SP * 


? GET 


SP 






7643 


036040 


005067 


000072 






CLR 


SSAVR6 


?WAIT 


LOOP FOR THE TTY 




€ 


7644 


036044 


005267 


000066 






INC 


SSAVR6 ! 


?if^AIT 


FOR THE INC 


1 




76*5 


036050 


001375 








BNE 


is ; 


;OF 


WORD 






7646 


036052 


012677 


143062 






MOV 


(SP)+ # PSWR ? 


?P0P 


STACK INTO @SWR 




C 


7647 


036056 


012605 








MOV 


(SP)+,R5 ; 


JPOP 


STACK INTO R5 


I 




7648 


036060 


012604 








*QV 


(SP)+,R4 J 


,'POP 


stack Into r4 






7649 


036062 


012603 








MOV 


(SP)+,R3 ; 


;POP 


STACK INTO R3 




f 


7650 


036064 


012602 








MOV 


(SP)+ f R2 ? 


JPOP 


STACK INTO R2 


« 




7651 


036066 


012601 








MOV 


(SP)+#R1 ? 


?P0P 


STACK INTO Rl 






7652 


036070 


012600 








MOV 


(SP)+#R0 J 


,'POP 


STACK INTO RO 




« 


7653 


036072 


012737 


035754 


000024 




MOV 


#$PWRDN f P#PwlRVEC 


; J SET 


UP THE POWER DOWN VECTOR 


I 




7654 


036100 


012737 


000340 


000026 




MOV 


#340,§#P^RVECt2 7 


?PRIOJ7 






7655 


036106 


104401 








TYPE 




; REPORT THE POWER FAILURE 




« 


7656 


036110 


037104 






SPWRMGS 


• WORD 


PQWERM 


JPOWER FAIL MESSAGE POINTER 


i 




7657 


036112 


012716 








MOV 


(PC)+,(SP) ? 


} RESTART AT START 






7658 


036114 


004336 






spwrad: 


. WORD 


START ; 


; RESTART ADDRESS 




1 


7659 


036116 


042766 


000020 


000002 




B1C 


#20 f 2(SP) ; 


? CLEAR W T W BIT 


< 




7660 


0161 ?4 


005067 


175304 






CLR 


STBIT J 


; CLEAR THE W T W BIT FLAG 




1 


7661 

.7662 


036130 
036132 


000002 

oooooo 






_$LLLUP.8 


RTI 
HALT 


• 


; THE 


POWER UP SEQUENCE WAS STARTED 


€ 



t 



i 
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7663 

1M1 



000776 
000000 



.-2 



SSAYR6 



?; BEFORE THE POWER DOWN WAS COMPLETE 
?;PUT THE SP HERE 



7665 
7666. 



7667 
7669 
7669 
767Q 



.SBTTL ERROR TYPE OUT ROUTINE 



?»THIS ROUTINE IS CALLED TO TYPE AN ERROR MESSAGE WHICH IS INCLUDED 



7671 
"672 



J*IN THE ERROR MESSAGE DATA TABLE , IT IS CALLED BY THE $ ERROR ROUTINE 
:*QR BY FIRST SETTING &ITEMB EQUAL TO THE ERROR TABLE ITEM TO BE PRINTED 



■a — | 

B J 



1 


f 6 1 3 










;*0UT AND THEN 


LCELU i iNt* A 5 






7&74 










* # 




USR PCfERTiPE 




1. 


7675 
7676 


0361 40 


104401 






;* 

ERTYPES 


TYPE 




■ nVn£ It nil C M 

JTYPE A CRLr f 




7677 


0361 42 


001 31 3 








, WORD 


$CRLF 






7678 


0361 44 


113737 


001152 _ 


001232 


■ 


MOVB 


few STSTNm , (p t $TMP0 




m 
1 


7679 
/680 


036152 
036160 


04* / 3 / 

A 4 11)1 


4 *I "7 A A A 

17/400 

A A 4 4 4 £. 

001 1 16 


00 1 23* 

A A 4 *> 5 A 
00*23* 




BIC 
NOV 


#4 "IT AAA Q « »!1tunA 

• 1 1 /400#«F#SFp!P0 
w# S ERR PC f i? W $ J MP 1 


1 

JbKil Pv O" wAIjL 




769 1 


036166 


1 OU40 








MOV 




• C A V C DA 


g 


7682 
















1 




7683 


036170 


113700 


001114 






NOV8 


##$ITEMB,R0 


J GET THE ITEM NUMBER, 




7684 


A ^ &. 4 *7 A 

036174 


A 4 *5 1 A A 

042700 


1 77400 






BIC 


« 4 tj j Aft da 
#1 F 1 400 » KO 




t 


7685 


036200 


001005 








8NE 


1$ 


c 




7686 


















7687 


036202 


013746 


001116 






MOV 


@#$EPRPC#-CSP) 


?IF ZERO THEN JUST 


1 


?688 


036206 


1 04402 








TYP0C 








7689 


036210 


000137 


036610 






JMP 


##ERT5 






7690 


















1 


7692 


036220 


A O 1 A A 
Met- 'Uv 

A A 4 AAt 

001005 


A A A 3 7 7 




1$ : 


CMP 
BnE 


20S 


# 
1 




7693 


036222 


016600 


000004 






MOV 


4(SP) ,RQ 




1 . 


7694 


036226 


/\ 4 4 AAA 

01 1000 








MU V 


f D A \ DA 

( RO } t R0 


1 






a ik JiA 


A A O 7 A A 


AAA AAA 
wwvivv 






ADD 


« A a A R A 






7696 


036<e34 


A A C i A A 

O0£> 400 






20$? 


DEC 


B A 

RO 


. nTurDU t C £. iLi A V til' DA KM 

; U 1 riEHW JL ot WAt\E HU AN 


1 


7697 


036236 


006300 








ASL 


R0 


; INDEX FOR THE TABLE. { 




7698 


036240 


006300 








ASL 


R0 




1 


7699 
7700 


036242 
036244 


006300 
062700 


001 442 






ASL 
ADD 


R0 

f $ERRTB, R0 


€ 




1 1 ft * 
f 701 


Jo«? 3U 




036260 






MOV 


I RO J + » # 


• a t f* u no tuc Afinoc cc 


c 


77CI3 
7704 


036254 
036256 


001404 
104401 








BEQ 
TYPE 


3$ 


JOF THE EM# ERROR MESSAGE | 


1 


7705 
7706 


036260 
036262 


000000 
104401 






2$S 


# WORD 
TYPE 





< 




7707 


036264 


001313 








.WORD 


SCRLF 






7708 


















1 


7709 
721SL. 


036266 
_.01.6272 


012037 
. 001404 


036276 




3$: 


MOV 
BEQ 


(R0)t,@#4$ 
5$ 


;GET THE DH,DATA HEADER t 




7711 


036274 


104401 








TYPE 






t 


7712 


036276 


000000 






4$: 


« WORD 





t 




7713 
7714 


036300 
036302 


104401 
001313 








TYPE 
. WORD 


SCRLF 




c 


7715 
7716 


P36304 


010146 






5$: 


MQV 


R1,*(SP) 


c 

JSAVE R1.R2 AND R3 




7717 


036306 


010246 








MOV 


R2#*(SP) 


i 


t 


7718 


03 .6.11 


010346 








MOV 


R3,-(SP) 





MAlNDEC 


• U -DFFP8 




POP 11/34 FPP DIAGNOSTIC PART ; 


I MACY11 27(1006) 


07-FEB-77 12S06 PAGE 140 


I_p ... 


DFFP8A.P1 1 01 


- N V -» 7 6 


21J06 ERROR 


TYPE OUT 


ROUTINE 




1 


7719 
7720 


036312 


012001 




MOV 


(R0)+# Rl 


?GET THE ADDRESS UF THE 


f 


7721 
7722 


036314 


001002 


„„_ — , 


SNE 


6$ 


;DATA TABLE. 


7723 
7724 


036316 


0001 37 


036576 


JMP 


»#ERT4 


^RETURN If NO DATA, 


I 


7725 
7726 


036322 


01 1000 


6$: 


MOV 


(RQ) ,R0 


;GET A POINTER TO THE DATA 
; FORMAT TABLE. 




7727 
7728 


036324 
036326 


105710 
001004 


ERT15 


TSTB 
BNE 


(RO) 
7$ 


jFORMAT ZERO? 


J 
1 


7729 
7730 


036330 


013146 




MOV 


§(Rl)+#-(SP) 


; FORMAT ZERO SO TYPE 


€ 


7731 

1112_... 


036332 
036334 


104402 
000137 


036560 


TYPOC 
JMP 


$#ERT2 


;AN OCTAL NUMBER. 




7733 
7734 


036340 


- 


7$ S 








1 


7735 
7736 


036340 
036344 


122710 
001011 


000002 8$S 


CMPB 
SHE 


#2, (RO) 
9$ 


? FORMAT TWO? 


i 


7737 
7738 


036346 


013102 


: _ _ 


MOV 


@(R1H,R2 


? FORMAT TNO SO TYPE TWO 




7739 
7740 


036350 
036352 


012246 
104402 




MOV 
TYPOC 


(R2)+i »(SP) 


jOCTAL NUMBERS. 


I 


7741 
7742 


036354 
036356 


104401 
037153 




TYPE 
. WORD 


SPACE 




I 


7743 
7744 


036360 
036362 


01 1246 
104402 




MOV 
TYPOC 


(R2 ) / • ( SP ) 






7745 
7746 


036364 


000137 


036560 


JMP 


@#ERT2 




• 


7747 
7748 


036370 
036374 


122710 
001021 


000003 9$; 


CMPB 
BNE 


# 3* (RO) 

10$ 


JFORMAT THREE? 


f 


7749 
7750 


036376 


013102 





MOV 


@(R1)+,R2 


; FORMAT THREE SO TYPE 




7751 
7752 


036400 
036402 


01224b 
104402 




MOV 

typoc 


(R2)+#-(SP> 


fFOUR OCTAL NUMBERS. 


1 


7753 
7754 


036404 
036406 


104401 
037153 




TYPE 
. WORD 


SPACE 




t 


7755 
7756 


036410 
036412 


01224b 

104402 




MOV 
TYPOC 


(R2 J+ f »(SP) 






7757 
7758 


036414 
036416 


104401 
037153 




TYPE 
.WORD 


SPACE 




1 


7759 
776Q 


036420 
036422 


012246 
104402 




MOV 
TYPOC 


(R2)+# -(SP) 




C 


7761 
7762 


036424 
036426 


104401 
037153 




TYPE 
.WORD 


SPACE 






7763 
7764 


036430 
036432 


01 1246 
.10*40.2, 




MOV 
TYPOC 


(R2),-(SP) 




1 


7765 
77bb 


036434 


000137 


036560 


JMP 


<a#ERT2 




c 


7767 


036440 
036444 


122710 
001005 


000004 10$; 


CMPB 
BNE 


#4, (RO) 
11$ 


?FORMAT FOUR? 




7769 
7770 


036446 


013146 




MOV 


8(Rl)+,-(SP) 


;FORMAR FOUR SO TYPE 


1 


7771 
7772 


036450 
036452 


104403 
016 




TYPOS 
.BYTE 


16 


; AN OCTAL NUMBER 
JSUPPRESSING LEADING ZEROES. 


1 


7773 
7774 


036453 
036454 


000 
000H7 


036560 


.BYTE 
JMP 




0#ERT2 





MftlNPEOl 1»D F F P6-A 
DFFp8A,pll 



0l«NOV~76 21506 
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ERROR TYPE OUT ROUTINE 



7775 
7776 



036460 1227 10 000005 



US 



CMPB 



#5, CR0) 



7777 
7778 



036464 00100b 



8NE 



13$ 



7779 
7780 



036466 
036472 



012137 
104401 



036474 



MOV 
TYPE 



(Rl)+,$#12$ 



7781 
7782 



036474 
036476 



000000 
000137 



12$5 



036564 



.WORD 
JMP 





##ERT3 



7783 
7784 



036502 122710 0Q0011 



13$5 



CMPB 



7785 
7786 



036506 001006 



8NE 



#11, (RO) 
15$ 



7787 
7788 



036510 
036514 



013137 
104401 



036516 



NOV 
TYPE 



£(R1H,£»#14$ 



7789 
7790 
7791 
7792 



036516 
036520 



000000 
000137 



14$ 



036564 



. WORD 
JMP 



##ERT3 



036524 122710 000QU 



15$! 



CMPB 



#12, (RO) 



7793 
7794 



036530 001012 



SNE 



17$ 



7795 
7796 
7797 
7798 



036532 
036534 
036540 
036542 



013102 
012703 
012246 
104402 



000006 



MOV 
MOV 



@(Rl)tf R2 
# 6 , R 3 



16$ 



MOV 
TYPOC 



(R2)+,~CSP) 



7799 
7800 



036544 
036546 



104401 
037153 



TYPE 
, WORD 



SPACE 



J FORMAT F IVE? 



? FORMAT FIVE SO TYPE AN 
gASCIZ STRING, 



; FORMAT ELEVEN? 



FORMAT ELEVEN SO PICK 
A POINTER TO AN ASCIZ 



STRING. 



; FORMAT TWELVE? 



; FORMAT TWELVE SO TYPE 
J TYPE SIX OCTAL NUMBERS 



78(11 

780? 



036550 
036552 



077305 
000137 



036560 



SOB 



R3, 16$ 

##ERT2 



7803 
7804 



036556 000000 



UAL 



HALT 



7805 
7806 



036560 104401 



ERT2 5 



TYPE 



7807 

JJLM. 



036562 037151 



. WORD $TA8 



7809 
7810 



7811 
7812 



036564 
036566 



005200 
005711 



ERT35 



INC 
TST 



RO 
(Rl) 



7813 
7814 



036570 
036572 



001402 
000137 



036324 



BEQ 
JMP 



ERT4 
##ERT1 



7815 
7816 



036576 104401 



ERT4S TYPE 



j UNDEFINED FORMAT FOR DATA????? 



?PRINT A TAB AFTER TYPING 



5 AN DATA TABLE ENTRY 
;0F ALL FORMATS EXCEPT 



J ASCIZ, FORMATS 5 OR 1 1 



fPOlNT TO THE NEXT FORMAT 
; END OF DATA TABLE, 



DONE. 



7817 
7818 
7819 
7820 



036600 
036602 
036604 
036606 



001313 
01260 3. 



,WORD 
MOV 



7821 
7822 



036610 
036612 



012602 
012601 
012600 
000207 



MOV 
MOV 



$CRLF 
-LSP) + fB3 



ERT55 



MOV 
RTS 



(SP)+,R2 

(SP)+,R1 



(SP)+,RO 
PC 



7823 
7824 



;RESTORE R1,R2 AND R3 



JRESTORE RO, 
; AND RETURN, 



7825 

H2Jl 



7827 
7828 



.SBTTL FPP SPURIOUS TRAP TO 244 HANDLER 



7829 
7830 



?»THIS ROUTINE HANDLES UNEXPECTED TRAPS TO THE FPP TRAP VECTOR AT 244, 



MAINDEC-ll~PFFP8«A 
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DFFPBJUPl 1 



Ol-NOV-76 2HQ6 



FPP SPURIOUS TRAP TO 244 HANDLER 



1 



7831 
7832 



;#THE LAST FPP INSTRUCTION EXECUTED AND ITS ADDRESS HAS BEEN RECORDED 
;»TH£SE ALONG WITH THE FEC t FPS AND PC OF TRAP ARE REPORTED . 



7833 
7834 



036614 011637 001236 



FPSPURS NOV 



(SP)f i#$TMP2 



;SAVE PC OF TRAP 



7835 
7836 



036620 
036622 



022626 
170200 



7837 

1&23L 



036624 
036630 



010037 
170300 



001240 



CMP (SP)+,CSP)+ 

STFPS RQ 

MOV R0,£#$TMP3 

STST RO 



; RESTORE SP. 
? GET FPS 



; GET FEC 



7839 



036632 
036636 



010037 
1 Q4247 



001242 



1$ ; 



MOV 
ERROR 



ROf £#$TMP4 
247 



7841 
784? 



036640 104412 



RSETUP 



?G0 INITIALIZE THE FPS AND STACK? AND 
;SEE IF THE USER HAS EXPRESSED 



7843 
J844 



; THE DESIRE TO CHANGE THE SOFTWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 



7845 
7846 



;THE USER TYPED CONTROL G?) 



036642 000 137 033150 



JMP 



£#$EOP 



7847 
784g 



7849 
7850 



7851 



.SBTTL CPU SPURIOUS TRAP TO 4 HANDLER 
ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 4, 



f 


7853 
7854 


036646 


011637 


001236 


?* 

CPSPUR! 


MQV 


CSP), §>*$TNP2 


JSAVE PC OF TRAP. 


1 


7855 
7856 


036652 
036654 


022626 
104250 




1$: 


CMP 
ERROR 


(SP)+, (SP)+ 

250 






7857 
7858 


036656 


104412 






RSETUP 




•GO INITIALIZE THE FPS AND STACK; AND 
?SEE IF THE USER HAS EXPRESSED 


c 


7859 
7860 














; THE DESIRE TO CHANGE THE SOFTWARE 
{VIRTUAL CONSOLE SWITCH REGISTER (HAS 


€ 


7861 
7862 


036660 


000137 


033150 




JMP 


g#$EQP 


J THE USER TYPED CONTROL G? ) * 


7863 
7864 


f 


7865 
7866 








.SBTTL CPU SPURIOUS TRAP TO 10 HANDLER 
• ;###*#*########♦####*#####♦#*###*♦#»**#*#**##***#####*#####»*#*'♦ 


• 


7867 
7868 








• • ###»######»######*#**#*#############«•###»######♦##»############ 
?#THIS ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 10, 




7869 
7870 


036664 


011637 


001236 


?* 

cptwo; 


MQV 


(SP)#@«$TMP2 


;SAVE PC OF TRAP. 


f 


7871 
7872 


036670 
036672 


022626 




l$: 


CMP 
ERROR 


(SP)+, (SP)+ 
251 




• 


7873 
7874 


036674 


104412 






RSETUP 




?GQ INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 




7875 
7876 














; THE DESIRE TO CHANGE THE SOFTWARE 
;VIRTUAL CONSOLE SWITCH REGISTER (HAS 


t 


7877 
7878 


036676 


000137 


033150 




JMP 


$#$EOP 


; THE USER TYPED CONTROL G?) . 


c 


7879 
7880 
















7881 
7882 


f 


7883 
7884 










•SBTTL 


SET LOOP ON 


ERROR ADDRESS ROUTINE 



7885 
7886 



MAINPEC-U-DFFPB»A POP 11/34 FPP DIAGNOSTIC PART 2 MA C*!! 27(1006) 

01-N0V-76 21S06 



07-FEB-77 12:06 PAGE 143 



DFFPBA,Pll 



SET LOOP ON ERROR ADDRESS ROUTINE 



7887 
7888 
7889 
7890 



• # 



036702 
036706 



011637 
000002 



001110 



.LPER: MOV 



(SP) f 3ISLPERR 



RTI 



7891 
7892 



7893 
7894 



.SBTTL FLAG RESET AND CONSOLE TEST ROUTINE 
S»THIS ROUTINE W ILL BE CALLED AT THE END OF EACH TEST TO 



7895 
789b 



? #RE5ET THE STACK, CLEAR THE FPS AND SEE IF THE USER HAS TYPED 
;* CONTROL G ON THE TERMINAL. IF THE USER HAS TYPED CONTROL G AND 



7897 
7898 



?#THERE IS NO PHYSICAL CONSOLE SWITCH REGISTER THEN THE CONTENTS 



4 


7899 
7900 










?*TELETYPE AND 
?* 


THE USER CAN MODIFY IT, 






7901 
7902 


036710 


023727 


001140 


177570 


.RSETS 


CMP 


§#S^R, #177570 


ISEE IF THERE IS A PHYSICAL 
ICONSOLE SWITCH REGISTER. 


4 


7903 
7904 


036716 
036720 


001001 
104406 








8NE 
CKS^R 


1$ S 


! BRANCH IF NO, 

lOTHERWISE TYPE THE CONTENTS 


7905 : 
• 7906 ! 


fOF THE PROGRAM VIRTUAL SWITCH REGISTER 
; AND GIVE THE USER A CHANCE TP 




7907 
7908 


036722 


012737 


036614 


000244 


1$ S 


MOV 


#FPSPUR f $#FPVECT 


\ MODIFY IT, 


c 


7909 
7910 


036730 
036/36 


012737 
01 i l 3 / 


036646 
036664 


000004 

A A A A 4 f\ 

000010 




MOV 
NOV 


#CPSPUR,@#ERRVECT 
tCPTWOt ^#10 




I. 


7911 

7912 


036744 
0367 46 


011600 
01 2706 


001100 






MOV 
MOV 


(SP),R0 J 
#STACK,SP 1 


' SAVE RETURN ADDRESS. 

! RESET THE STACK POINTER, 




7913 
7914 


036752 
036754 


005004 
170104 








CLR 
LDFPS 


R4 jCLEAR THE EPS, 
R4 




7915 
'916 


036756 


oootio 








JMP 


(RO) ; RETURN, 




7917 
791 8 












, NLIST 


BEX 
















5 THESE 


ARE SPECIAL MESSAGES ; 




f 




036760 


051124 


050101 


042520 


MSA1 : 


• ASClZ 


'TRAPPED AT5 »<TAB><TAB> 








036776 
037021 


054105 
107 


042520 
052117 


052103 
051040 


NSA2S 
MSA35 


♦ASCI Z 
.ASCIZ 


* EXPECTED TRAP AT • ' <TAB> 
•GOT RO! 1 <TAB><TAB> 








037033 
037051 


105 
107 


050130 
052117 


041505 
040440 


MSA4: 
HSASs 


.ASCIZ 
• ASCIZ 


'EXPECTED RO! '<TAB> 
•GOT ACO: '<TABXTAB> 








037064 


054105 


042520 


052103 


HSA6! 


.ASCIZ 


•EXPECTED AC05 '<TA8><TAB> 






037104 


050200 


053517 


051 105 


POWERM: 


• ASCIZ 


<CRLF>»POWER FAILURE. PROGRAM RESTARTING .» <CRLF> 






037151 
037153 


Oil 
040 


000 
000040 




$TAB! 


.ASCIZ 
• ASCIZ 


<TAB> 
i i 








037156 
037174 


041501 
_&§1$&6 


047440 


042520 
MJ4£0., 


msi : 
HS2: 


, ASCIZ 


'AC OPERAND: '<TABXTAB> 
• FSRC OPERAND; * <TABXTAB> 


1 




037214 

037.2.13. 


041501 
101 


020060 
030103 


042502 
040440 


MS3: 
MS4: 


.ASCIZ 
.ASCIZ 


•ACO BEFORE EXECUTION: • <TAB> 
'ACO AFTER EXECUTION :' <TAB> 






037271 
037313 


105 
107 


050130 
052117 


041505 
051040 


MS5j 
MS6; 


.ASCIZ 
.ASCIZ 


* expected result: ' <tab> 
•got result: »<tabxtab> 




l 




037331 
_Q1LL55 


106 
XIX 


040522 
052116 


052103 
J&4J5Q5 


MS7: 
MS10S 


.ASCIZ 
. ASCIZ 


' FRACTIONAL RESULT: »<TAB> 
' INTEGER RESULT: ' <TAB> 


t 




037377 
037423 


105 

105 


050130 
050130 


041505 
041505 


MSI IS 
MS12: 


.ASCIZ 
•ASCIZ 


•expected fraction: «<tab> 
•expected integer; '<tab> 



4 
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037446 047514 042101 042105 MS37; .ASCIZ 1 LOADED DATA? • 

037464 042522 042101 042040 MS4QS .ASCIZ ' READ DAT A 5 ' 

037500 054105 042520 052103 MS415; .ASCIZ ' EXPECTED DATA: ' 

037520 040504 040524 044440 MS418 .ASCIZ ' DATA IN (RO) FS RC; ' 

037544 040504 040524 044440 MS42! .ASCIZ ' DATA IN ACO! » 

037562 047507 020124 042522 MS43: .ASCIZ 1 GOT RESULTS « _ 

037577 105 050130 041505 MS44S , ASCIZ ' EXPECTED RESULTS 1 

037621 200 042524 052123 CORMESS .ASCIZ <CRLF> 1 TEST 22, TE STING INTERRUPTS. « <CRLF> 













STHESE 


ARE ERROR 


MESSAGES * 




037660 


050106 


020123 


040502 


EMI s 


. AoC 4 


♦EPS BAD AFTER CMPD (R)<rA» , 






All (C f\ * 

041301 


020060 


04/515 




. ASi. J, Z, 


t apa unnTPTtrn q v p u d Pi fDl A % 
f AL0 MUuif ItU PI v-^rU IKi f A, ' 


(0) 


037746 








EM3 S 






f i \ 

( 1 ) 


03 / / 46 


A C A 4 f\ L- 

0501 06 


0201 23 


A 4 A C A O 

04050* 




.ASCI I 


f rPS «?AD Af TER LHPl?, vtHur ? 




037772 


041050 


052125 


042440 




Jt ff» |M » iff 

.ASCIZ 


'(BUT ENBT) STATE 225 WENT TU 475 INSTEAD Or 0/5, 1 


(&) 


040053 








EM4 S 






( 1 ) 


Ail 

040053 


1 06 


051520 


A J <l A jt A 

041040 




•ASCII 


f FP5 BAD AFTER CMPD. , <CRLr> 




040077 


050 


052502 


020124 




.ASCIZ 


*(BUT ENBT) STATE 225 WENT TO 075 INSTEAD OF 475.' 


( 0) 


040160 








EM 5 • 






( * ) 


0401 60 


050106 


0201 23 


A A A C A *°» 

040502 




.ASCI I 


'rrS BAD Ar T6.K c"ru . 1 <CKyr > 




040204 


041050 


052125 


042440 




. A5C I Z. 


' {dUI bNoi ] o 1 A 1 1 j? WtNI 1U U/3 1 No 1 LAU Ur 4/D." 


( 0) 


A A A O £. C 

040265 








EW6 ; 






£ 4 * 

( 1 ) 


040265 


1 06 


051520 


041040 




• ASC I I 


*rPS BAD Ar TER LMPD»'<LBLr> 




All A ] 1 4 

04031 1 


A C A 

050 


AC At 

052502 


A *i A 4 A 

020124 




« A5L, IZ 


'(WUl &,NdJIJ oiAit 033 "fcw I IU ttO XNoic.AU UP / 3> . 


(0) 


040372 








EM7 • 






( I ) 


040 J / 4? 


ACA4 A £, 

050 J Oo 


A *i A 4 "4 3 

0201 23 


ft A A C A J 

040&0* 




•ASCII 


'rrS BAD ArlEH LMrP, ^t,"«r > 




04041 6 


041 050 


0521 25 


04^440 




• ASCIZ 


iBUT ENt?T x o J STATE /// SHOULD MAVL v»UNL JTU OU/.' 


(0) 


040* f ' 








ru 4 a • 






(1 ) 


040477 


106 


051520 


A jI 4 A A A 

041040 




ASC 1 1 


'rrS oAD ArlE,K t-Mfu . ' %wHJjr > 




040523 


050 


052502 


020124 




.ASCIZ 


»(BUT ENBT ¥8} STATE 777 SHOULD HAVE GONE TO 405. » 


(D) 


040604 








E«l 1 S 






C I j 




AC A 1 A 

0501 Oo 


A O A 4 13 


A A ft K A O 

04U30* 




• ASL I 1 


• cdc o a n a tr t it d funh i ^roi c\ 
'rrS tSAU Ar ltK vMr V . * ^wHyr ^ 




A i Af 1 A 

040630 


041050 


ac n a ^ e? 

052125 


A J* "J A A A 

04 /040 




.ASCIZ 


f (BUT NBir ZWll) STAlt 4D0 oMUUiiU ilAVfc. VtUNc* iU 0X0. f 


I 0) 
I 1 ) 


040 / 1 3 
040 / 1 4 


4 A In. 

lOo 


A C 4 CIA 

051520 


A A 4 A A A 

04*040 


cm a • 
EMI i * 


.ASC II 


'Fro BAD AflEK C«r D • 1 ^CHliP > 








ACOCAI 


V / M 1 4 ** 




a cr t 7 

• ftO v J. £t 




(0) 


Ail /\ A 

041022 








EMI 3 S 






/ * \ 

I 1 J 


A A 4 ftOO 


00 1 oo 


A OA 4 O "J 
* V I 4 J 


A A A A O 




A Of TT 






A A 4 AAA. 

041 040 


AAA** A A 

044504 


A A "J 4 A A 

04 f I 4 


0D *04 / 










041136 








EM14; 






(1) 


041136 


050106 


020123 


040502 




.ASCII 


»FPS BAD AFTER CMPD.'<CRLF> 




041162 


041050 


052125 


054040 




.ASCIZ 


1 (BUT XNBT XZBT) STATE 363 WENT TO 140 INSTEAD OF 100, 1 


($) 


Q 41 250 








EM15S 






(t ) 


041250 


050106 


020123 


040502 




•ASCII 


»FPS BAD AFTER CMPD.'<CRLF> 




041274 


041050 


052125 


054040 




•ASCIZ 


'(BUT XNBT XZBT) STATE 363 *ENT TO 100 INSTEAD OF 140. 1 


(0) 
LU 


041362 
041362 


050106 


020123 


040502 


EMI 6 S 


•ASCII 


•FPS BAD AFTER CMPD.'<CRLF> 




041406 


044504 


047104 


052047 




.ASCIZ 


/DIDN'T TAKE THE PATH; STATE 777, TO 407./ 




041457 


104 


053111 


020104 


EM17: 


• ASC I z 


'DIVD (R),A TRAPPED TO 244. FSRCsO AND FID=!,' 




041534 


050106 


020123 


040502 


EM20S 


, ASCIZ 


•FPS BAD AFTER DIVD (R),A,« 




041566 


042506 


020103 


040502 


EM21S 


•ASCIZ 


»FEC BAD AFTER DIVD (R)#A,« 




041620 


044504 


042126 


024040 


EM22S 


•ASCIZ 


/DIVD (R) f A DIDN'T TRAP TO 244. FSRC=0 AND FID=0./ 




041701 


104 




020106 


EM2 3 • 


.ASCIZ 


'DIVF (R).A FAILED.' 




041724 


050106 


020123 


040502 


EM32S 


• ASC I 


' FPS BAD AFTER DIVF (R) , A, • 


(0) 


041756 








EM24S 
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( 4 \ 


All ICi 

Oil f 30 


A A A ft A A 

044304 


A A 2 4 It. 

044126 


A "4 A A A A 

4 4Q40 




» or* T T 
. Aot 1 1 


'IJlVr I i< J f A riHlljC.L'*' 






042000 


A A 1 A £ A 
041030 


A C 1 4 1ft 

052123 


A ft A A A A 
05 4440 




1 C n I 17 

• Ai>C 12. 


♦ /LiflT V£.4^ JiiCMT T i") CTATC" AAt T WCTC *n f*IIT 

'IBUi SfOiJ WSLNl I U SiAlk 000 IN^lLAW Ur 






A A O A Si A 








(TM 7 ft • 








t 4 \ 

( 1 J 


ft Jl 1 f\ E d 

042054 


A Jl A ft A A 

044304 


A A *5 4 1 fa. 

044126 


A 1 A A /I A 

024040 




H C T T 

, AoCII 


*UIVr (R)#A rAll^^%U, , 






0420 7 6 


04 /340 


020122 


04311 / 




» aoCl£> 


ttfriD (16* CITU BTTC C A T I t?H ft f A T GT A7A 1 
'AUK Uf i7lv»N Pllo f AlbtU Olftlft 4 / • 




( 0) 


042141 








EM26 S 








( 1 ) 


A /I O 1 A 4 


4 A A 

104 


a c "a 4 4 4 
054111 


A *"} A 4 A to. 

020100 




• A5C I I 


i ft t ur f a \ a pa Tr en I 
, 0IVI' I R J t A rAAiit.L?t 


™_ — — — — _ — — 




04* 1 6 4 


A C A 

030 


A c o e A 

032502 


A 't A 4 OA 

02012 4 




tAi>L IZ 


' i"Ul 101J PttN 1 1U blAlt 400 1 No 1 tAU UP 


A A& 1 

000 . * 






042054 






EM27=t 


1 i A, F 

>^25 






(0) 


04223 / 








EM 30 * 








t 4] =fc 

( * ) 


0422 J7 


104 


053111 


A *> A 4 A £. 

020106 




• ASCII 


I (\TltP /A> A If > T J PA t 






042261 


124 


052522 


041516 




„ ASCI Z 


'TRUNCATION ERROR. rl-l» f 




I 0) 


04431 1 








C* U 1 4 ■ 

EMJ1 S 








/ 4 \ 

\ 1 ) 


0*4? 5 J J 


1 A A 

104 


AC J 1 4 4 

034111 


A 1 A 4 A 

020100 




.ASCII 








042 3 33 


4 **» O 

122 


A C 1 C 4 "9 

0525 1 7 


A J A4 4 i. 

042116 




• ASCX6 


* RUUNP £,RRUR t Ni-ll, ' 








A A A ft a A 

044304 


A A O 4 ii 

042126 


A 1 A A A A 

024040 


4 4 * 




• ntun f o \ & c* a t I Pn ♦ 

U1VU 1 1< f f A rftlMCtU, 






A A A A 4 

042401 


1 A £. 

106 


051520 


A <4 4 A A A 

041 040 


EM34: 


« 1? A T ft 

. ASCI2. 


*FPS BAD AFTER DIVD (KJ|A» ' 




4» A \ 


0424 3 4 








CM 2 ft • 

LM 43 » 








# 4 \ 
( 1 ) 




1 A A 

104 


A ft 7 4 1 1 

03 411 1 


aa A 4 A A 

0201 04 




• Aqv i 1 


ihTi/n e o \ a c* a 7 r . it n 1 «f p p r it > 






A^ TAR*. 

04 2430 


net 4 *»A 

051 124 


A A 1 4 Oft 

04/123 


A A A ft A 7 

04030 4 






1 TDilHf STTAN (TDPfiD C*T— 1 t 




f (\ \ 










U 1 k • 

LP) 40 ? 








I * J 


OS 2000 


A A itlAA 

04 **304 


A A 7 4 7 &. 
042120 


An a(\ 
024040 




• Ad w l 1 


1 n-j un t a \ A PATr C" f"> (/fOt P* > 

Miyy IK J f ft r AHjCiI/, ^WKfer 






042531 


122 


052517 


042116 




.ASCIZ 


* ROUND ERROR , FTsO. 1 






A A O ft ft A 

42334 


Aft OK 4 ft 

03231 3 


A A 4 4 A 

0441 14 


A O A A A A 

024040 


C*M 7 7 * 


, Aou I £t 


* Mfir.F f si .s pATrpn i 

"Uijir 1 1\ ) f ft r HJl u&y t 






AA7ft77 
0443 / / 


1 AA 
100 


Aft 1 ft3 A 

0313 20 


A A i AAA 
04 * 04v 


c>uaai 
E,r»40 • 


• A*>V. * « 


1 rne tiAA APT PD MITT IT fOl.& 1 




/A. * 


A A 1 *t 2 4 

042041 








ITU A 4 * 

c. M4 1 : 








/• 4 % 

(*) 


042041 


113 


A A £. 4 7ft 

040 123 


A O A 4 A fc. 

020 1 0O 




R CP T T 
a A&L 1 1 


• utri P rb-i a CAT i.rn ■ <fPp r Ps 






042654 


n* /IC Al 

044523 


047107 


041040 




n e f T *7 

. A0CI4. 


ICTPM Q I T ti » n CfATC ft44 1 

f OlG" Oil 0AU olAllt 311, 




1 A A 
# 4 \ 


A4 01AA 

042 *04 

A jl O 7 A A 

042 / 04 


03 2313 


A /I U 4 4 A 

044114 


A O A A Jl A 

024040 


CM AO* 


& Cf* T f 








A A 07 07 

044 # 4 f 


IIO 


Aft 4 4 1 7 

03111 f 


A A Aft 4 ft 
40313 




A c f« T T 
«, Aow J, A 


• MODMA! T 7 A T T HA! PIT f,PH 1 tTBI.fTi 






042 / 3D 


A CL A 

050 


A C A ££ A A 

052502 


A A A 4 -~ \ A 

020124 






| / QfiT V^O \ cTRTi ACn UitTAI'T Tfl AAA T HQTFin 
■loul 102.I SIAJE* 232 n&Wi lu 044 iWoiLAU 


flF AAA t 

ur ****** • 


I If J 


04 ill 40 








tL"4 4 * 








^ 4 \ 
( 1 ) 


A j* 1A1C 

044043 


4 4 ft 
113 


A /I 4* 4 Oft 

046 1 25 


A *i A 4 A fc. 

020106 




• ASC X 1 


i kittt V i n ^ A P A T f PH 1 /^Ot PN 






043060 


047516 


046522 


046101 




,,ASCII 


* NORMALIZATION FAILED. * <CRLF> 






043106 


041050 


052125 


054440 




. ASC IZ 


? IBUT Xo21 SIAId 232 w&Nl lu 444 INSi LAO 


i r i C* A >l A 1 

Ur 044 , * 


( v) 


A A 1 1 








g,W44 * 








( 1 ) 


04 i 1 66 


05251 5 


043114 


024040 




•ASCII 


'piuLr (R)»tA r AILED, ' <CRLr > 






A A 7 7 4 4 

4 J 2 1 1 


4 7 
122 


A ft 1 C 4 7 

03251 / 


A A 7 4 4 *v 

0421 10 




A e r» t 17 
. ASwl«< 


f KUUNil C(KKUK| rl— 0.* 




(.0)_ 


043234 








EM45 S 








(, 1 J 


A A 7 7 7 A 
A a *a ♦> ft *7 

04423 / 


Aft 7 ft 1 ft 

03 23 1 3 

4 I VI 

124 


A A "3 4 4 A 

0441 1 4 
052522 


A O A A A A 

024040 
041516 




* ASCII 
•ASCIZ 


1 u;ir r f O \ ft C*ftTfCA 1 /^DI C ^. 

'Piuyr iRlfA rAiLife,D» ^Cr*Lr> 
'TRUNCATION ERROR • FT=1«' 






A A 1 1 A 7 

044 40 1 


1 A to 

100 


A ft 4 C 1 A 

0315 20 


A A 4 A A A 

041040 


t - U A i» • 

c,r14o • 


* c r* T *7 


1 CD C UAH ifTpD U f] r A f O \ h 1 

* P ro BAU Ar itK WUijU l«J i A, ' 






043341 


4 * C 

115 


046125 


020104 




% c? t «jr 

.ASCIZ 


* MULD CRJfA FAILED, 






A A 1 ltd 

04 4 40 H; 








b"4 / * 








t t \ 

( 1 J 


A A 1 3 &. A 

044404 


A ft 7 ft 4 ft 

05 231 3 


A A 1 4 4 A 

042114 


024040 




.ASCI I 


lUnt A f r\ \ ft PI Tl PA 1 X 1 r\ r C "x. 

*MULD (R)fA p AILED <CRLr > 






A A 7 A A 7 
V 4 4 ** w # 


1 A7 
10 4 


A A 7 4 A 1 

042101 


A A i AAA 
4*440 


— ■ — 


A ftp T T 

• A£>L 1 1 


i c »n rriMCT ant fiftcn tu tuc miif. ai i^nPTTUM 

' DAU V, U W O 1 ft !M I UOtLM A" lut ffllUu HLvjUKl 1 nn, 


i 




ft A 1 /I t L 

04 345b 


Q52600 


042523 


030104 




.ASCIZ 


yA AI Pv 1 IICL' 5 A *\ A T kl P (DC* A A fTlC* C£. C T A T C rtAA 1 

<CRLF> ' USED 24 INSTEAD Or 56 STATE 020. ■ 




#* At \ 
i IP J 


AA 7ft 5 A 
044320 








C U ft A ■ 








I 1 J 


A A 7 ft 7 A 
4 4 3 20 


Aft 3ft 1 ft 
0323 1 3 


A .4 O 4 4 A 

042114 


AO A A A A 

02 40 40 




• A5L J I 


■ r\ f a \ A pa t r pr\ i / t* 1 !!! P\ 






043543 


124 


052522 


041516 




•ASCIZ 


• TRUNCATION ERROR. FT = 1. • 




(0) 


043573 








EM51 ; 








( t ) 


043573 


115 


046125 


020104 




•ASCII 


•MULD (R) f A FAILED. »<CRLF> 






043616 


.Q475£2_ 


047125 


020104 




•ASCIZ 


* ROUND ERROR. FTs=0.' 




(0) 


043641 








EM525 








O ) 


043641 


H5 


046125 


020104 




• ASC I I 


* NULD (R),A FAILED. «<CRLF> 
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043664 


040502 


020104 


047503 




.ASCIZ 


' BAD CONSTANT USED IN R0UND1NG# FT=sO.* 




A A 3 *I 3 4 

043/31 


4 A t- 

I 06 


A C 4 C 1 A 

0515 20 


A A 1 AAA 

0410 40 


rut i I i 

t- W 1 1 i • 


H iH V? <w * 4y 


irnc Qftn fttflTB Mill C fDl A fTYpprr'TRn filTFrtflTf.nw t 




044006 


*\ C A 4 A 4W 

050106 


020123 


A A A R A 1 
040504 


L"U 4 4 O » 

fcW 1 1 1 * 


ft <lf* T *7 


ipdc Dih AITTITC Mfll C f ft 1 - A PXPfrTPn UMl'ifi Rf« Til 1^/ ' 


(©) 


f\ A A i\ £L A 

044064 








g-i u 4 4 3 • 

EMI 1 3 ; 






/ 4 \ 


A A A A & A 


0343 1 3 


4 3114 


A A A A A A 
U 4 40 4U 






• Miir.ir i* d \ . a iPft.Tr.Fn *<£:r'Dr.F> 

nUU" I K; | s "HI ULU . ^wnw" ' 




044107 


4 rt C 

1 05 


A C A 4 ^ A 

0501 30 


A /I 4 CAR 

041505 




a e f* t 
• A5C 1 Z 


'LArfcLllNvj uV&HrljUWf r IV-U, ' 


CO) 
(1) 


044142 

A J A t it <«1 

0441 42 


A C A £ 4 C 

052515 


A A ~3 4 4 A 

0431 1 4 


A A A A A A 

024040 


EMU4S 


.ASCII 






044165 


105 


050130 


041505 




, ASCIZ 


' EXPECTING UNDERFLOWt FIU=0. • 




0<*44i i 


4 4 C 

115 


046125 


f^i **5 4 rf-u 4^ 

0/0106 


EN 115S 


9 ASCIZ 


■ uiM r / a i ft fDftDDii n 1* f i j A A 1 1 Ki fi U k T K fc~ f . fi UJ ft y»n 1 
* WUiir ( K i f A IKArrky 1U 4*t*t Un UVE»r*"*iU". ^*f• ^ U^| , 




044277 


4 4 e 
115 


i\ A i± 4 AC 

0461 25 


A A A 4 A £>. 

020106 


CM 4 4 £ • 


# AOL 1 L 


IMIIT.IT f p 1 ft TPAPPPn Tfl 344. nifl UNDFRFT.DW FT Us A * 




044356 








EMI 1 7 I 






( t ) 


All )Ci 

044356 
044434 


t\ C A R 4 K 

052515 
041050 


A yl 5 4 4 yf 

043 1 1 4 
052125 


A A A A A A 

024040 
043040 




h c r* t t 
# ASC IZ 


I Mill P / r> % A <T» D 1DDP Tl TO Odd DM II fvl D F D F T .H U P" T Tl = A * 

'(HU1 rlUj cjiAlb 331 WtNl ly 133 AWd1e.AiV up 113. T 


( t>) 
(1) 


044514 
044514 


052515 


A •« n i 4* if 

0431 1 4 


A A A A J| f\ 

024040 


EM120S 




•ASCII 


'MUjbr (RjffA TRArrLD 1U 4b4^ UP* U NUtl/Kr ljUW . r 1U»U| ' 




044572 


A i i ATA 

041050 


052125 


043040 




, ASCIZ 


ifiiiti 1 curt cFAff yftiT i<ri i^^ riyCTii'in nc HCI t 
f (bul r IU) SlAlD 13/ WtNi 1 U 133 1 No I &AU UP 1 1 3 . ' 




044652 








EMI 21 5 






^ 4 

( 1 ) 


i-i * a ten 


A C 1 R 4 R 

052313 


A A 3 4 4 A 

043114 


A A A A A A 

024040 




• HOC 1 1 


i m if r v e a \ a tqapppd rn odd nN nuF&Fr.nu nvsn * 

'nUlir IKJ |A lt\flrr6U IU 4^*t Ul» UVCil\rliUB» rli"«i 




044727 


050 


052502 


rt A A 4 A A 

020124 




, AoL 1*6 


*(DUi r 1 V J »>lAlEi 333 w&wl IU 13tJ 1 IMC? It. AU Ur 110.' 


19) 

^ j ^ 


A A R A A *J 
A 4 C A A *7 

04500 / 


113 


A A £t 4 11! 

0461 43 


A *1 A 4 A i-i 

040106 


irU 1 A 3 » 
14 4? 


• A5w 1 1. 


• uiit r fol S TD A OOFn Tfl Odd nN nuFDPi nu B" T Us: A t 




045064 


041050 


052125 


043040 




.ASCIZ 


• (BUT FIV) STATE 133 mm TO 136 INSTEAD OF 116.* 




A it C 4 A A 

0451 44 


n C A 4 /* 

050106 


0201 23 


040504 


C,nl 43 * 




1 poc DAi) AC 1'L'D MtIT H f D i .i ff" YDBT'T T NT nVlTPtTf.nW * 
* r rib HAU At* 1 C.K rlUJUU IKJ »H, tAr Cv, * 1 ™ w UVDKryuw. 




0434/4 


AC A 1 A<« 

0301 Oo 


0401 43 


A A AR A*> 

04030* 


DU4 A A * 

e,n 1 4 4 * 




i CDC a ft iA A L'TITD Mill n f ft \ a 6* ¥ Dirr*T 1 iTNniTPirT.nu * 


(0) 


A iC 2 A 4 

045301 








C ' &4t 4 AC • 

1 43 * 






y 4 \ 
( 1 ) 


A J C 'J A 4 

043 501 


113 


A A £. 4 A C 

046143 


0401 04 




a cr* T T 

a H&W 1 1 


« miit n »*di & c a ti pn • «*rDi,rv 




045 324 


054105 


04^520 


052103 




.ASCIZ 




(0) 

(1) 


043 35 / 
045 357 


4 4 C 
115 


A VI £. 4 AC 

046125 


020104 


r |i 4 A • 

t,"l 46 J 


•ASCII 


1 MULD (RJfA r hlbt>D m ' ^CRIif ^ 




045402 


054105 


042520 


052103 




.ASCIZ 


•EXPECTING UNDERFLOW, F1U=0. 1 




045436 


AC <^C 4 C 

052515 


0421 14 


A A /t A » /\ 

024040 


C.M1 27 5 


„ A&t I4& 


• Mttrn i* d i A td a PDcrn to a a a nw rui PDirr.ny ptv- a i 




A^CC 4 A 


U 3 4 3 1 3 


044114 


A3 d A A A 
04 40«*U 


C.W A 3 v * 


»CAf 9 

• AOL 14. 


* MIT f r\ t Q \ A T D iDDCD Tfl 3 d d nM HftinCPiVr filiK t Tlisfl * 


(0) 


0455 / J 








Ciul 4 2 4 » 

C.MI 315 






en 


045573 


115 


046125 


020106 




.ASCII 


» MULF (R) # A TRAPPED TO 244 ON UNDERFLOW. FIUsO. ♦ 


045651 


05Q 


052502 


020124 




. AoCIZ 


1 / DMT r t II \ eTAT£? 3U4 UiCrKiT *f»n 4CC T llCTlTAh fl E* 44R 1 

f (ByT rlUJ &rAlt< 33l wfe«N i IU 135 ANolCAD Ur 113.' 


ecu 


045 / 3 1 
043/31 


1 4 C 

113 


0461 43 


A "1 A 4 A A 

040104 


cm 4 ni 
EMI 34 * 


, ASC I I 






043 /34 


A C A i AC 

054103 


AjI A C OA 

042520 


A R 3 4 A 1 

054103 




, Aot JL i 


1 £ VDIiTf TUT 1 1 KJ ti tP D IT T ri ill Fifl-" A 1 




04600 7 


200 


A Jl 4 a C A 

041 050 


a e a 4 "* a 
052125 




. A5L l4» 


/^D» • / DIIT r r\ \ CT ft TIT 4 4 R ki C M T Tfl AAA TUCTPAH nC* A T R 1 

Hyr > ' I dU 1 rUJ olAir, 113 nt>fi». IU 444 iNoltAU Ur 44:3. 


(») 
c ^ ? 


046067 

A A JL A f- T 

04606 7 


4 4 C 
115 


0461 25 


A *1 A 4 Hi* 

0201 06 


EH133? 


A c r* T T 

. HO v- * X 


1 Li 1 1 1 IT A KDXnniTn Til AAA r»*l f I HtV t> IT T ri ui C*TfI-»A 1 

f MULr (RJfA TRAPPfcD iU 444 ON UwUtKrypW. r lU-Ui 




A a £. 1 A R 

046143 


A C A 

030 


A C A C A A 

034504 


A A A 4 A A 

020144 




* c r» t 9 1 


f / DIIT tf t f I 1 C T A T 6" 1 11 kjCTftlT Tfl 1 RR f M C TIT ft n niT 1 1 R 1 
' (BUI r IU J o 1 A 1 & 13/ flfcWl 1 U 133 1 NO 1 bAU UP 113* 


(0) 


A A C '"i A C 

0464 25 








E* U 4 5 A • 

EMI J4 S 






f i \ 
( * ) 




I l*> 


A d A 1 OH 

M40 1 43 


A3 A1 Ail 




• A»>L 1 1 


i miii ri ( d i ft to & DDcn Tfi Odd nw nvirRfTT.nw riv-rt ' 




Alt. 1 A A 

040 304 


A A 1 A R A 

041030 


034 1 43 


A A J A A A 

04 3040 




ft C f* T <7 

. ASw 1 Z 


" loUl rlVj 31A1H. 333 ntfu IU 130 A N O J. C-AU U" llO.' 


(0) 

i ^ ) 


046364 
046364 


05431 3 


042114 


A A A A Jl A 

024040 


lft,M 1 33 * 


ft cr 1 T T 
. Aol 1 1 


* MUjLU (K)fA r AllilLu. f v^Hlir ' 




046405 


105 


050130 


041505 




.ASCII 


f EXPECTING OVERFLOW, FIV^O. 1 




U tt O * 3 / 


3 A A 

4 v v 


A A 4 AC A 

0^1030 


AC 3 4 AC 

1/3 4 1 4 3 




• A^L. 1 <6 




(0) 


046517 








EM136: 






(1) 


046517 


115 


046125 


020104 




.ASCII 


' MULD (R),A TRAPPED TO 244 ON OVERFLOW. FIV*0,» 




046574 


041050 


052125 


043040 




.ASCIZ 


•(BUT FIV) STATE 133 WENT TO 136 INSTEAD OF U6. « 




046654 


042506 


020103 


040502 


EH137J 


•ASCIZ 


*FEC BAD AFTER MULF (R)#A. EXPECTING OVERFLOW, FEC-tO.' 




046742 


042506 
043731 


020103 


040502 


EM140S 
EM141= 


.ASCIZ 
EMI 1 1 


♦FEC BAD AFTER MULF (R),A. EXPECTING UNDERFLOW, FEC-12 • 1 
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DFFPBA.Pll 01 


-NOV*76 


215 06 




F^ G RESET ANT) 


CONSOLE TEST ROUTINE 


(0) 


047031 


044006 






EMI 42 = 

EMI 43 ! 


EM112 




(1) 


047031 
047054 


115 
054105 


046125 
042520 


020106 
052103 




.ASCII 
.ASCIZ 


1 MULF CR),A FAILED. ' <CRLF> 
'EXPECTING OVERFLOW, FIV-l. f 


CO) 
CD 


047107 
047107 


115 


0461 25 


020106 


EM144; 


.ASCII 


f MULr CR),A r AILED. * <CRLr > 




047132 
047166 


054105 


042520 


052103 


— — —— — 
EM! 45 ! 


.ASCIZ 


'EXPECTING UNDERFLOW, FIUsl.' 


(1) 


047166 
047253 


052515 
050 


043114 

052502 


024040 
020124 




•ASCII 
. ASCIZ 


* MULF C R ) # A FAILED TO TRAP TO 244 ON UNDERFLOW . F1U=1.« 
'CBUT FIU) STATE 331 WLNT TO 115 IN5TtAD Uf lD!> t ' 


(0) 
(1) 


047333 
047333 


115 


046125 


020106 


EM1465 


•ASCII 


* MULr (R) f A PAILC.D Tu 1HAP fU 244 UN UNDc.RrLUw. r*U»l, 


CO) 


047420 
047500 


041050 


052125 


043040 


EMI 47 ? 


.ASCIZ 


•CBUT FIU) STATE 137 WENT TO 115 INSTEAD OF 155,* 


(1) 


047500 
047564 


052515 
041050 


043114 
052! 25 


024040 
043040 




•ASCII 
« ASCIZ 


' MULF CR),A FAILED TO TRAP TO 244 ON OVERFLOW. FIV*1.' 
"(BUT FIV) STATE 333 wENT TO 116 INSTtAD Ur lio.* 


CO) 
(1) 


047644 
047644 


052515 


043114 


024040 


EM150? 


.ASCII 


'MULF CR)irA FAILED 10 TKAr 1U ^44 UN UVERrLUW. f 1V-1 , 1 




047730 
050010 


041050 
042506 


052125 
020103 


043040 
040502 


EM! 5! : 


.ASCIZ 
•ASCIZ 


»CBUT FIV) STATE 133 WENT TO 116 INSTEAD OF A36, ' 

•FLC BAD AFTER MULD (R)#A # EXPECUNG OVERrLOw# rEC-lO.* 




05007b 


042506 
0451 44 


020103 


040502 


EM152S 
EM153- 


.ASCIZ 
EM! 23 


• FEC BAD AFTER MULD CR) f A. EXPECTING UNDERFLOW, FEC=12.* 


(0) 


050165 


045222 






EM!54= 
EMI 55? 


EM124 




CD 


050165 

050210 


115 

054105 


046125 
042520 


020104 
052103 




.ASCII 
.ASCIZ 


» MULD (R) f A FAILED. * <CRLF> 
'EXPECTING OVERrLOw, r I V = 1 . 1 


CO) 

CD 


050243 
050243 


115 


0461 25 


020104 


EM156; 


•ASCII 


•MULD C R) # A r AILE.D. ' <CRLr > 


CO) 


050266 
050322 


054105 


042520 


052103 


EM1575 


.ASCIZ 


♦EXPECTING UNDERFLOW, FIUsl,' 


it ) 


050322 
050407 


052515 

A C A 

050 


042114 
052502 


024040 
0201 24 




•ASCII 
•ASCIZ 


1 MULD CR),A FAILED TO TRAP TO 244 ON UNDERFLOW . FIU=I. f 
»C"uT t" IU) 5TAT& 331 w&NT TO 1 * 5 INSTLAi; Ur l3t>t' 


CO) 
CD 


050467 
050467 


115 


0461 25 


020104 


EM160: 


. ASC I I 


'MUtiD CR)#A r AILdD . * ^v-RLr ? 




050512 
050545 


054105 

"3 A A 


042520 

f\ A 4 A C A 

04 ! 050 


052103 


; — 


.ASCII 
•ASCIZ 


•EXPECTING UNDERFLOW, FIU=l f » 

<C#Lr> CBUJ. WD) J>iA*c< W6.Nl iU *<eo JtwolfcAU Ur *k£l 9 * 


CO) 

(D 


050625 
050625 


115 


046! 25 


020104 


EM161 ; 


.ASCII 


1 MULD (R),A r AILED TO TRAP TU 244 UN UNDERr LUW . plU--^. , 


(01 


050712 
050772 


041050 


052125 


043040 


EM 162* 


.ASCIZ 


1 CBUT FIU) STATE 137 WENT TO 115 INSTEAD OF 155. • 


CD 


050772 
051056 


052515 
041050 


042114 
052125 


024040 
043040 




.ASCII 
.ASCIZ 


•MULD ( R ) f A FAILED TO TRAP TO 244 ON OVERFLOW . FIV=l f « 
•(BUT FIV) STATE 333 WENT TO 116 INSTEAD OF 136.' 


CO) 
(!) 


051136 
0511 36 


052515 


042J 1 4 


024040 


EM163? 


f ASCII 


* MULD CR) # A FAILED. 1 <CRLF> 




051161 
05121 3 


105 
200 


050130 
O41M.0 


041505 
052125 


— 


.ASCII 
, ASCIZ 


'EXPECTING OVERFLOW, FIV*1,» 

<CRLF > ' C BUT FD) STATE 700 WENT TO 426 INSTEAD Or 427.' 


CO) 
CD 


051273 
051273 


115 


0461 25 


020104 


EMJ64S 


tASCII 


'MULD f R ) , A FAILED TO TRAP TO 244 ON OVERF LOW , FIV^l. 1 




051357 
051 4 37 


050 
106 


052502 
051520 


020124 
04! 040 


EM55 5 


•ASCIZ 
.ASCIZ 


* (BUT FIV) STATE 133 KENT TO 116 INSTEAD OF 136.' 
'FPS BAD AFTER MODF CR),A.' 




051471 
051522 


115 
047515 


0421 17 
43104 


020106 
024040 


EM53! 
EM54S 


.ASCIZ 
•ASCIZ 


♦MODF CR),A FRACTION BAD. ' 
'MODF (R),A INTEGER BAD,' 


CO) 
ULL_ 


051552 
051552 


5JI5JL5 


043104 


024040 


EM565 


.ASCII 


' MODF (R),A FRACTION BAD. ' <CRLF> 




051603 
051643 


101 


030103 


042040 


£M57; 


.ASCIZ 


*AC0 DID NOT GET IN STATE 424.' 
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DFFPBA.PH 01-NQV*76 21506 FLAG RESET AND CONSOLE TEST ROUTINE 



r 4 X 

( 1 ) 


A c 4 t> A 3 

05 1 6 * J 


113 


A A O 4 4 "1 

04211 / 


A *S A 4 Aw 

020100 




A c C r r 










051673 


101 


030503 


A 4 ^ A Jl A 

042040 




A O ^* T 


1 Av 1 P10 NUT bfc- 1 IN is 1 A 1 L H<| 






(0) 


A £: 4 11 "J 

051733 








C* U C A • 









_ , 


ill . 


051733 


115 


042117 


020106 




* f n f T 

• A5C I I 


f Ulfl r\ C / D ^ a TklTC^CD QAD | / pot C* V 

T WUPr IK) i A INIECjEH d AP • * ^wKLir 









051763 


101 


030503 


042040 




A C f* T "7 


• >/<•« i\ti\ iiHT fCT HUE' T MTPflrO T M CTSTF 1*JA ! 
f AO. 1 UlU NU J ijfcl 1 HE lWifc.v?ftirv 1H olAlt 1 a4# 




— — , . — _ — — . 




052035 








EM61 5 










( 1 ) 


052035 


* 4 C 

113 


A A 1 4 4 1 

0441 17 


A **1 A 4 A U. 

020106 




»c(it r 
* AoL i 1 


■ MuUr y H / c A CHALXION p AU • **v"1j" * 




— _, 




052066 


020101 


040502 


020104 




• ASCI I 


*A dAU CUN51 Awl WAS Uofc-U INui 44J IN olAlt 


AjI4 i 

U 46 , * 






052144 


047600 


020122 


041 050 




A C T *T 

, A&CIZ. 


<CKLr > 1 UK I BUi Noil J SlAlt 343 WLN 1 4. U 030 


T U C *f ' ft" a n 


Ur 1 30 • 




U344 3 1 








EM62 « 










(1) 


052231 


115 


042117 


020106 




, ASCII 


* M0DF (R),A FRACTION BAD # '<ChLF> 








052262 


020101 


040502 


A 1 A 4 A A 

020104 




. A5CI I 


ia a » n fn&iet»AMT i»i'Ae nccrv ^nn'T OAS tm ctrtc 
'A DAP CUNSJ7ANJI WAS UobU (NUA 44J" AN OlAlt 


A4i 1 

U^O • T 






052340 


047600 


0201 22 


A A 4 AC A 

041050 




m ASCI 6 


<CRLF>»0H (BUT NBIT) STATE 525 WENT TO 150 


INSTEAD 


nir ac a i 
Ur U 3 U « 


(0) 


052425 








EH 6 3 ? 










c i ) 


052425 


4 4 C 

115 


0421 1 7 


A O A 4 A £* 

020106 




fi C f* T t 


'MuDF CR),A FRACTION 8AD.'<CRliF> 








052456 


041050 


052125 


A Cf C A 4 /i 

055040 




• ASC'IZ 


1 (BUT ZBT) STATE 532 WENT TO 102 INSTEAD OF 


122, » 




(0) 

( 1 ) 


052536 
052536 


047515 


043104 


024040 


EM64S 


• ASC I I 


♦M0DF (R),A FRACTION BAD.'<ChLF> 








AC 1C £ 1 


AC A 

y 3U 


032502 


A O A 4 *5 A 






'(BUT ENBT EZBT) STATE 041 WENT TO 046 INSTEAD OF 


*. ** o , 


(0) 


052655 








En63 I 










( » ) 


A C A i. C C 

032633 


113 


A 4 It 4 4 "7 

04211 / 


A *> A 4 Ak 

040106 






»M0DF (R),A FRACTION BAD f '<CBLF> 








A C *5 "7 A L. 

052 ' 06 


a A 4 acn 

041 050 


A C 1 4 IE 

052125 


A A "J A A * I 

043040 






'(BUT FT) STATE 126 SHOULD HAVE GONE TO 133, FT=0. 




(0 s ) 

# 4 v 

( 1 ) 


052/70 
052 / /0 


04 /3 1 5 


A A S 4 A A 

043104 


A A A A A 

024040 


EM66 * 


, A5C 1 1 


1 MQDr (R) # A rRACTION BAP t , <CRLr> 








053021 


123 


043511 


020116 




.ASCIZ 


1 Clf hi b IT D A ft 1 






(0) 


053037 








put 1 1 










(1 ) 


053037 


115 


042117 


020106 




•ASCII 


nUyr IK J i A 1 N I c<br<r< pftPt >Lnli" ' 








053067 


4 3 

123 


A A 1 IT I 4 

04351 1 


0201 1 6 




* ASCIZ 


'SXvjN BIT BAP IN STAifc. t35 m w 








A C ^ 4 O *1 

053 1 22 


A A 1 C 4 C 

04 / 3 1 3 


0421 04 


A 1 A A A ft 

024040 


C U 1 A • 

6»M / 5 


« AoC 1 6 


1 N0DD (R),A FRACTION BAD, 1 








AC: ) • C 1 

053153 


4 4 C 

115 


0421 1 7 


020104 


cult • 

EM7 i : 


h e t 

. AbCli 


♦HODD ( R) # A INTEGER BAD, 1 








AC 30A1 


1 00 

AC 1 '5 A 3 

033203 


AC 4 C O A 

03 13 40 


A A 1 AAA 
041 04U 


Ew / 2 ' 
EM / 3-D 


• AoCl<v 

U "7 '} 

M / 4 


'FPS BAD AFTER M0DD (R) # A* * 






($) 

# 4 % 

( t ) 


053235 
053235 


4 4 C 

113 


A A O 4 4 H 

04211 7 


A A A 4 A A 

020104 


EM74? 


R Cf T T 


♦W0DD (R) # A INTEGER BAD. » <CRLF> 








AH }<)^C 


A C A 

050 


A C *i C A 1 

052502 


A 1 A 4 A A 

020124 




* AoC 16 


»(BUT FD) STATE 231 WENT TO 142 INSTEAD OF 


143,' 






053344 








rule A 

EM #3 * 










( » ) 


v3 3 344 


04 / 3 1 3 


A A O 4 A A 
4 4 1 4 


A *i A. A A A 




a c f T T 

^ Tit W -i- 


'M0DD (R) # A FRACTION BAD. 1 <CRLF> 








0533/5 


4 A 4 

101 


A 1 A 4 A ^ 

30103 


A A "i A A A 

043440 




• AOv* 1 £r 


'AC0 GETS IN STATE 425 FAILED, « 






(0) 

/Ik 

( 1 ) 


053435 
05 i 34 33 


4 4 C 

113 


A A O 4 4 T 

0421 1 7 


A 'i A 4 A A 

040104 


EM76J 


•ASCII 


'M0DD (R) # A INTEGER BAD • 1 <CRLF> 








AC ^ A&C 




A 3ACA 1 


U *t 1? v 






1 ACI GETS IN STATE 143 FAILED, 1 






CO) 


AC 1C. 

053525 








EM7 7 * 










(!) 


ac KOK 


113 


A A *> 4 1 1 
04411 / 


A *5 A 1 A A 

04U 1 0^ 




& c f T T 

^ JTI li? J. Jtr 


' M0DD ( R) f A FRACTION BAD, ♦ <CBLF> 








AC ^ C C 

053556 


041050 


0521 25 


04 3040 




. AoClZ. 


'(BUT FD) STATE 526 WENT TO 134 INSTEAD OF 


135,' 




I (VI 
I 0) 

(1) 


AC 

AC It 3C 

053635 


4 4 e 

115 


042117 


Aft A 4 A Jl 

020104 


CM 1 AA • 


• ASCI I 


•MOOD (R),A INTEGER BAD, 1 <CRLF> 








AC 3KkC 


4 1 3 

123 


A A 1 C 4 4 

04351 1 


A A A 4 < i. 

0201 1 6 







'SIGN BIT BAD IN STATE 526.' 








_J)JJ7JJ) 








emioi ; 










f 1 \ 

1 1 J 


V 3 J f 4 U 


A A "7 «n 1 *> 

U ** / 3 l 3 


A A *3 4 A A 


A A A A A A 




A Cf T T 


' MODD (R) f A FRACTION BAD • ' <CRLF> 








AC 3 "7 C 1 

05 3/3 1 


4 A 4 

101 


A jl 4 A A A 

041040 


A >i O 4 A 4 

044101 




• ASCI I 


•A BAD CONSTANT WAS USED (NOT 56) IN STATE 


046, ' 






054027 


200 


051117 


024040 




•ASCIZ 


<CRLF>'0R (BUT NBIT) STATE 525 WENT TO 050 


INSTEAD 


OF 150.' 


(0) 


054H4 








EM102: 










(1) 


054114 


047515 


042104 


024040 




•ASCII 


' MODD (R) r A FRACTION BAD,'<CHLF> 








054145 


101 


Q4*Q40 


042101 




•ASCII 


»A BAD CONSTANT WAS USED (NOT 56) IN STATE 


046, ' 






054223 


200 


051117 


024040 




•ASCIZ 


<CRLF>»QR (BUT NBIT) STATE 525 WENT TO 150 


INSTEAD 


OF 050.' 




054310 








EM103S 
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DFFP&A.Pll 01 


-NQV-76 


21? 06 




FLAG RESET AND 


CONSOLE TEST ROUTINE 


(1) 


054310 
054341 


047515 

050 


042104 

,052502 


024040 
0201 24 




.ASCII 

.ASCIZ 


' M0DD ( R) f A FRACTION BAD. 1 <CRLF> 

'(BUT ZBIT) STATE 532 wfcNT TO 122 INSTEAD Op 102»' 


(0) 
( 1 ) 


054422 
054422 


047515 


042104 


024040 


EM104: 


•ASCII 


*M0DD (R)#A INTEGER BAD,'<CRLp> 




054452 
054504 


042523 
047600 


020124 
020122 


047111 
041050 




, ASCI I 
•ASCIZ 


»SET INTEGER IN AC1 FAILED, • 

<CRLF>'0R (BUT rD) STATL fSS WENT TO 156 INSitAQ ur ID / , ' 


(0) 
( 1 ) 


054567 
054567 


115 


0421 1 7 


020104 


EM105; 


♦ASCII 


*M0DD (R)#A INTEGER BAD, T <CRLF> 


f CM 


054617 
054676 


050 


052502 


020124 


EM106S 


.ASCIZ 


1 (BUT FD) STATE 122 WENT TO 424 INSTEAD OF 425.* 


(1) 


054676 
054726 


047515 
041050 


042104 
052125 


024040 

it *i #v j4 A 

043040 




.ASCII 
.ASCIZ 


' HODD (R),A INTEGER BAD, • <CRLF> 

f (l5Ul ru) SlAit 446 «LNi lu 1 £0 ANalc.AU Uf li/ t ' 


(0) 
( 1 ) 


055005 
055005 


4 * C 

115 


0421 1 7 


A A 4 /v >t 

020104 


EM107: 


.ASCII 


* MODD (R)#A INTEGER BAD . 1 <CKLr > 


(0) 


055035 
0551 14 


050 


052502 


020124 


EMI 105 


.ASCIZ 


»(BUT FD) STATE 446 WENT TO 126 INSTEAD OF 127, • 


Ct) 


055114 

AC f * Am 

055 1 45 


047515 

A & A 


042104 

A CE O C A ^ 

05<c50<£ 


024040 
040124 




.ASCII 
•ASCIZ 


• MOOD ( R ) f A FRACTION BAD, ' <CRLF> 


(£) 

( 1 ) 


055224 

a e c **i '1 * 

055224 


rt alt < e 

04 /5 1 5 


A il 5 4 A A 

043104 


A *i A A ,4 A 

02^040 


EM165: 


. AoC I I 




(0) 


055307 
055310 


000 






EMI06S 


.BYTE 





(1) 


055310 
055372 


047515 

AAA 

000 


043104 


024040 




•ASCII 

m \i tr* 

♦ BYTE 


/MODF (R),A INTEGER BAD, RESULT 0¥ER OR UNDER FLOW./ 

A 



($) 
(!) 


055373 
055373 


1 A £. 

1 06 


0515/0 


Alt A J A 

041040 


EM167; 


ft C f* T T 


/roc o a n act e*d unriir t o \ & / 
/fro DAU Ar 1 C.K Snuur i K J f A, / 




055424 
055425 


000 






EMI 70* 


. BYTE 





it) 


055425 
055456 


106 
05 4105 


041505 

a A *i e *i a 

042520 


041040 
05/103 




•ASCII 
•ASCIZ 


/FEC BAD AFTER MODF ( R ) * A • / 
'C.XPC.WTING URfwc*RrLOW# rtl,-!^' 


i 0) 
( 1 ) 


055513 
05551 3 


115 


A A A 4 4 T 

0421 1 7 


020106 


EM171: 


.ASCII 


/MUyr (K),A liMiDtiLH bAU, Hfc»aUijA UVLK UK UWLJc,l< r ijuw,/ 


(0) 


055575 
055636 


200 


041501 


020061 


EMI 72 ; 


# ASCIZ 


<CRLF>*AC1 GETS IN STATE 126 FAILED, 1 


o ) 


055636 
055667 


042506 

4 nC 

105 


020103 

A C A 4 1 A 

0501 30 


040502 

A A \ C A IC 

04* 505 




• ASC I I 
.ASCIZ 


/FEC BAD AFTER MODF (R)#A./ 
' t,Ar tf\. 1 1 NQj UVt.r<rijUWf rLl«lu, ' 


(0) 
( 1 ) 


055723 
055 7 2 3 


113 


A A *5 4 4 *T 


A *J ft 4 A fc. 


EM173: 


•ASCII 


/MUDF IRJ#A INlLfcrEH BAD* K&oUul UVfcK UH UNuc,H riiUw./ 


( 0) 


056005 
056071 


200 


041050 


052125 


EMI 74 5 


.ASCIZ 


<CRLF>'(BUT FIV FD) STATE 520 WENT TO 142 INSTEAD OF 162,' 


(*) 


056071 
056153 


115 

* 1 A A 

200 


042117 
041050 


020106 
052125 




.ASCII 
.ASCIZ 


/MODF (R) f A INTEGER BAD, RESULT OVER OR UNDER FLOW,/ 

<l„ HLr > T ( Dll I r IV rUJ &1 Ait 340 wE.Nl lu lod iNol&AU Ur 1**<£. 


(0) 
( 1 ) 


056237 
056237 


113 


A A 1 4 4 1 

04^117 


A A A * f% i*. 

020 1 06 


EM175? 


1 a A T f 


/MODF (R)#A INTEGER BAP, RdSULT OViiR OR UNULR rLOw,/ 


(0) 


056321 
&&635.1 .... 


200 


044523 


047107 


EM176! 


.ASCIZ 


<CRLF>«SIGN BAD IN STATE 517,' 


(1) 


056351 
0564 34 


115 

AAA 

000 


042117 


020104 




•ASCII 
• BYTE 


/M0DD (R)#A FRACTION BAD. RESULT OVER OR UNDER FLOW./ 



(0) 
( 1 ) 


056435 
056$ So 


4 4 C 

115 


042117 


020104 


EM177S 




/MODD (R)#A INTEGER BAD. RK5ULT UV&R OK UNDfc,R rLUW./ 


(0) 


056517 
056520 


000 






EM200: 


.BYTE 





(1 ) 


056520 
056551 


050106 
000 


020123 


040502 




•ASCII 
.BYTE 


/FPS BAD AFTER MODD (R)#A,/ 



(0) 

(i) 


056552 
056552 


042506 


020103 


040502 


EM201 : 


•ASCII 


/FEC BAD AFTER MODD (R),A./ 
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056603 


1 A A 

200 


054105 


042520 




1 CP f 1 ? 

• ASC I L 


or • cvDcr'TTyr nuni"Dr{ fiui rcr-1 "3 I 
<CRLr > * E^rtC * i«vi UNDtKr yUWi rfc-L*-**.* 


J®) 


056641 








EM202 S 






c 1 ) 


056641 


115 


042117 


020104 




ft A T T 

. ASCI I 


/MODD fRjfA INlEbER bAU. Ktoukl UVII.H UK UNUfcH rjUUw./ 




056723 


200 


041050 


052125 




•ASCIZ 


<CRLr>'C"UT ru) S1ATE l^X wfc.Nl XU l^o INS 1 LAU Ur 1 2; / • ' 


(0) 


057003 








r y o A i • 

EM20 3 « 






CD 


057003 


115 


042117 


020104 




.ASCII 


/MODD CR)tA INTEGER BAD. RESULT OVER OR UNDER pLOw./ 




05/065 


g\ f\ 

200 


041050 


052125 


— — — — — 


1 CCITli 

• ASCIZ 


<CRLr> , (t3UJ rU) SI Alt, w*t / WtNl iu 1 4o iNJ>lc,AU Ur U f « 


(0) 


0571 45 








F 1 * fed 1Kb A A A 

EM204 : 






(1 ) 


057145 


106 


041505 


041040 




• A A T r 

• ASCI I 


/rEC BAD AFTER MUDD CRJ#A./ 




057176 


042600 


A 1" A. 4 "H A 

0501 30 


041505 




* a- A} Y j* 1 * 

. ASCIZ 


<CRLF > 1 EXPECT ING OVERrLOwJf fEL^lO. 1 


(0) 


057233 








EM205S 






(1) 


057233 


115 


042117 


020104 




.ASCII 


/MODD CR)#A INTEGER BAD. RESULT OVER OR UNDER FLOW./ 




057315 


200 


041050 


052125 




. ASCIZ 


<CRLF>»CBUT FIV FD) STATE 520 WENT TO 162 INSTEAD OF 163.* 


(0) 


057401 








EM206: 






(!) 


057401 


115 


042117 


020104 




.ASCII 


/NQDD C R ) # A INTEGER BAD. RESULT OVER OR UNDER FLOI^./ 




057463 


200 


041050 


052125 




•ASCIZ 


<CRLF>'CBUT FIV FD) STATE 520 WENT TO 162 INSTEAD OF 143. « 


« w 


CO) 


057547 








EM207 : 






(1) 


057547 


101 


042104 


020104 




.ASCIZ 


/ADDD (R)fA PRODUCED A BAD RESULT,/ 




05761 1 








EM2105 






(!) 


057611 


124 


042510 


043040 




. ASC I z 


/ThE FPS WAS BAD AFTER ADDD CR) # A. / 




057653 


101 


042104 


A A, A A A Jt 

020104 


EM2 1 1 % 


.ASCII 


1 ADDD CR)fA FAILED IN THE RQUNDxTRUNK FLOwS. * 




057726 


053600 


047105 


020124 




•ASCII 


<CRLF>*WENT FROM STATE 663 TO 313# f <CRLr> 




057763 


111 


051516 


042524 




•ASCIZ 


'INSTEAD Ur r HUM o&J 1U iD 4 , 


C&) 


06001 7 








EM212; 






( 1 ) 


060017 


101 


042104 


A A 4 A. Jl 

020104 




•ASCII 


•ADDD CR)fA FAILED IN THE RQUNDXTRUNK r LOWS. T 


(1) 


060072 


052200 


042510 


043040 




.ASCII 


<CRLF>'THE FPS WAS BAD.'<CRLF> 


( i ) 


060114 


044504 


020104 


047516 




•ASCII 


f DID NOT TAKE THE PATn5 , vtHLr> 


( 1 ) 


0601 43 


106 


047522 


0201 15 




•ASCIZ 


/FROM STATE 664 f TO 505# TO 251./ 


C £*) 


a £ a *•* a *j 

060203 








K* ft J O 4 *J ■ 

EM2 1 3 ! 






( 1 ) 


060203 


101 


042104 


a. A A a 

020104 




.ASCII 


■ADDD CR)#A rAlLED IN IHt, HuUHu\ LHuvi& r LUWd. ' 


CI) 


060256 


052200 


042510 


043040 




.ASCII 


<CRLF> 1 THE FPS WAS 8AD.'<CRLF> 


(I) 


060300 


044504 


020104 


047516 




.ASCII 


»DID NOT TAKE THE PATH:*<CRLF> 


CD 


060327 


106 


047522 


020115 




. AS C I Z 


/FROM STATE 664 f TO 505, TO 253./ 


CO) 


060367 








EM2145 






Cl) 


060367 


101 


042104 


020104 




.ASCII 


* ADDD (R),A FAILED IN THE RQUNDxTRUNK FLOWS. » 


CD 


060442 


052200 


042510 


043040 




.ASCII 


<CRLF> 1 THE FPS WAS BAD. 1 <CRLF> 


(t ) 


060464 


044504 


020104 


047516 




.ASCII 


•DID NOT TAKE THE PATH:'<CRLF> 


CD 


060513 


106 


047522 


020115 




. ASC I Z 


/FROM STATE 664, TO 705, TO 735./ 


Ci» 


060553 








EM215? 






( 1 ) 


060553 


101 


042104 


020104 




•ASCII 


» ADDD CR)*A FAILED IN THE RQUNDXTRUNK FLOWS. « 


CD 


060626 


052200 


042510 


043040 




.ASCII 


<CRLF> 1 THE FPS WAS BAD. 1 <CRLF> 


CD 


060650 


044504 


020104 


047516 




.ASCII 


1 DID NOT TAKE THE PATH? , <CRLF> 


Cl ) 


060677 


106 


047522 


020115 




.ASCIZ 


/FROM STATE 664 f TO 705 # TO 737./ 




060737 


124 


042510 


024040 


EM216: 


.ASCII 


1 THE CBUT FIU FORK IN THE OVERxUNDER FLOWS FAILED, FIU =1.' 




061030 


053600 


047105 


020124 




.ASCII 


<CRLF> * WENT FROM STATE 331 TO 115. , <CRLF> 




061065 


111 


051516 


042524 




.ASCIZ 


' INSTEAD OF FROM 331 TO 155.' 




061121 


101 


042104 


020104 


EM217; 


.ASCIZ 


* ADDD CR)A TRAPPED TO 244 f . FID=1 . ♦ 


CO) 


061163 








EM220: 






CD 


061163 


101 


042104 


020104 




.ASCII 


/ADDD CR)#A TRAPPED TO 244./<CRLF> 


(D 


061216 


044124 


020105 


042522 




.ASCII 


'THE RESULT WAS AN OVERFLOW CONDITION BUT FIV= 0.' 


CD 


061276 


024200 


052502 


020124 




.ASCIZ 


<CRLF>/(BUT FIV) STATE 133 WENT TO 136 INSTEAD OF 116./ 


U) 


061357 


in 


051516 


042524 




.ASCIZ 


/INSTEAD OF FROM 133 TO 116./ 


CO) 


061413 








EM2212 






LJLJL 


061413 


101 


042104 


020104 




.ASCII 


/ADDD CR),A FAILED TO TRAP TO 244./<CRLF> 
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(1) 

# € *k 

. . „. ( 1 ) 


061455 

A L. 4 C "S A 

061534 


124 

A A A 4 ~*> A 

044124 


042510 

020105 


051040 

A A 1 A C A 

041050 




•ASCII 
•ASCI I 


'THE RESULT WAS A OVERFLOW CONDITION AND F IV*1 , f <CRLF> 
/THE (BUT rIVJ FuRK r A I U&v 9 /<CHJyr > 


(1) 

e 4 \ 
(1 ).... 


061567 
061 6/ J 


127 

4 4 4 
111 


047105 

A C 4 C 4 w 

051516 


020124 
4252 4 




.ASCII 


/WENT FROM STATE 133 TO 116,/<CRLF> 
/lNc>lt,AU Uf r KUM 133 IU 140»/ 


(0) 

t 4 \ 

( 1 ) 


061657 

ft £ 4 tCI 

06165 / 


4 A 4 
101 


04210 4 


A 1 A 4 A A 

020104 


EM2225 


• ASC I I 


/ADUD lR)#A TKArPED IU 244» /<CKLr > 


(1) 

t 4 \ 
( 1 ) 


061712 

A 6. 4 7 "7 1 

uO I / / 4 


044124 
20 v 


020105 

A A 4 aCa 

041050 


042522 

05 / 1 / J 




.ASCII 


1 THE RESULT WAS AN UNDERFLOW CONDITION BUT FIU= 0. 1 

y/'Di trv/fRfl'T Pllh e.T»Tt' ^ 3 t aJfUT TH 1 **** 1 WiTPift flW 1 1 *> / 
"Jur <? f \ p U I r*UJ olftlD -J J 1 WtWl 1 u 133 INOl CiM U Wr 1 1 O • ' 


f 1 1 

m * 

i rt. % 

(OJ 


062054 

ft il *1 4 4ft 
0621 10 


047111 


052123 


040505 


EM22 4 * 


.ASCIZ 


/INSTEAD OF FR0H 331 TO U5 t / 


(1) 
( * ) 


062110 

ft l. *i 4 c 'i 
06* 152 


042101 

A A A 1 "J A 

044124 


042104 

A A a a AC 

020105 


024040 

A A 1 & 1 "3 

0425/2 




.ASCII 
. I 1 


/ADDD ( R ) f A FAILED TO TRAP TO 244,/<CRLF> 


(1) 

t 4 \ 
( 1 ) 


062232 

ft £. 1 f> £. C 

062.165 


044124 
12/ 


020105 

aj|4i AC 

047105 


041050 

A 1 A 4 1 A 

0201 2 4 


— 


» ASC I I 
•ASCI I 


/THE (BUT FIU) FORK FAILED. /<CRLF> 
/WENT FRUM S1A1E 441 IU 1 1 5 $ f <LKuP > 


(1) 

(0) 


062321 

ft il 1 > c c 

062355 


lit 


051516 


042524 


EM224 5 


.ASCIZ 


/INSTEAD OF FROM 331 TO 155./ 


(1) 

# 4 -v 

U) 


062355 
062410 


101 
044124 


042104 
020105 


020104 
042522 




•ASCII 
. AbCI 1 


/ADDD (R),A TRAPPED TO 244./<CRLF> 

f THE HE5UL* WA§ AN UNUbKr LUw LUNUillUN dUI r IU- 0. 


(1) 

/ 4 \ 

.„_. U ) 


062471 

A i~ *1 K. C »'l 


200 

ft At 4 4 4 
04/111 


041050 
0521 2 4 


052125 

A A A C A 

040505 




•ASCIZ 
. ASC 1Z 


<CRLF>/(BUT FIU) STATE 137 NENT TO 155 INSTEAD OF 115,/ 

/lNSTc*AP Ur r RU™ 14/1UI15./ 


(») 

( * ) 


062606 

A 1 '1 k A L 

062606 


A A *5 4 A 4 

042101 


042104 


024040 


EM225! 


. ASL I I 


j r, r\r\r\ # o ^ ft c jv t i cr\ t> n toad TT4 o a A z/^dt rs 
/ APPD C K ) § A r A 1 ufc.L) IU IKAr IU 2 44 • / vlKbr > 


(1) 
t 4 \ 

C l ) 


062650 
6 2 # 4 


044124 

A A A 4 1 A 

044124 


020105 

A 1 A 4 AC 

020105 


042522 

A >1 4 A C A 

041050 




.ASCII 

ft C ^1 T T 

•ASCII 


* THE RESULT tfAS A UNDERFLOW CONDITION AND FIU = l , » <CRLF> 
/THE C BUT rlu) PORK r AlktD • /<CKLr > 


(1) 


062763 
06401 / 


127 

4 4 4 
111 


047105 
051516 


020124 

A A O C A 

042524 




.ASCII 


/WENT FROM STATE 137 TO tl5 f /<CRLF> 
/INSIEAD UP CHUw 14/ iu 155 t / 


($) 

( 1 ) 


063053 

ft i. *S A C 3 

06405 4 


4 A 4 

101 


A A 4 A A 

042104 


A^Ai ft A 

020104 


EH2265 


•ASCII 


/AD0D CR)#A TKAPPED TU 244#/ 


(1) 

t 4 \ 
{ 1 ) 


063105 
064161 


200 

4 A O 
102 


042502 
052 1 25 


040503 

A C *5 A A A 

052040 


— - 


•ASCII 
• ASC I L 


<CRLF>» BECAUSE OF AN EXPECTED OVERFLOW CONDITION , 1 <CRLF> 
* BU i THE r £-C WAS oftU, ' 


(0) 

# 4 \ 

( 1 ) 


063206 

At 1 ""J ft £. 

06 420O 


AiOt A 4 

042101 


A A *5 4 A A 

042 104 


024040 


EM227; 


•ASCI I 


/ADDD (R)fA TRAPPED TO 244# / 


(1) 

( 1 ) 


063240 
064414 


041200 

A C K A *> 

052502 


041505 
0201 24 


052501 

A it A 4 IA 

044124 




•ASCII 
. ASCIZ 


<CRLF>'BECAUSE OF AN EXPECTED OVERFLOW CONDITION , * <CRLF> 

■ y 1 1 T JULIE* flic y k C n lft t 

'BUT THE rrS WAS dAU, ' 


(0) 

t 4 \ 
{ * ) 


063341 
064441 


4 A 4 

101 


f\ A *5 4 4\ A 

042104 


AAAi A A 

020104 


EM230: 


•ASCII 


! 

/ADDD (R)fA TRAPPED TO 244jr/ 


U) 

t A \ 

.._ ILL., 


063373 

fit A 


200 

052302 


042502 
2012 4 


040503 

A A A 4 A 

04*124 




•ASCII 

• AOL I L 


<CRLF>'BECAUSE OF AN EXPECTED UNDERFLOW CONDITION , ' <CRLF> 
latif tup rirr wsq ash • 

'dUA inc. r&i, wAo dap.' 1 


(0) 

(I) 


063475 
063475 


101 


042104 


020104 


EM231S 


•ASCII 


/ADDD ( R) # A TRAPPED TO 244,/ 


(t) 
(1) 


063527 
063604 


200 
052502 


042502 
020124 


040503 
044124 




•ASCII 
•ASCIZ 


<CRLF>»8ECAUSE OF AN EXPECTED UNDERFLOW CONDITION* *<CRLF> i 
1 BUT THE EPS WAS BAD. ' 






0576U 






EM232= 


EM210 





(0) 


063631 








EM233: 






(1) 


063631 


114 


041504 


042106 




• ASCIZ 


\LDCFD (R)+,A RESULT INCORRECT. \ 


(0) 


063670 








EM234S 




i 


m 


063670 


030122 


041040 


042101 




.ASCII 


\R0 BAD AFTER LDCFD CR)+,A.\ 


(i) 


063722 
063754 


040600 


041040 


042101 


EM235: 


.ASCIZ 


<CRLF>» A BAD CONSTANT WAS USED. 1 

i 





MAINOEC 


•11-DFFPB 


• A 


POP 11/34 FPP DIAGNOSTIC 


PART : 
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DFFPBA.Pt 1 01 


»N0V»76 


21 !06 




FLAG RESET AND 


CONSOLE 1ESI KUUA1N& 


•fif" 


1 


(t) 

(0) 


063754 
064022 


041520 


041040 


042101 


EM236: 


•ASCIZ 


\PC BAD AFTER LDCFD #NUM# A. 1 RAP iu 4 . \ 


1 




(t) 
(9) 


064022 
064055 


041 520 


041040 


042101 


EM237S 


.ASCIZ 


\PC BAD AFTER LDCFD # NUM » A , \ 




1 


(1 ) 
(D 


064055 
064107 


122 
200 


020060 
020101 


040502 
040502 




•ASCII 
.ASCIZ 


\RQ BAD AFTER LDCDr CRl+^A.X 
<CRLF>'A BAD CONSTANT WAS USED.' 


j 
1 


1 


(0) 
( 1 ) 


064141 
064141 


106 


051520 


041040 


EM240! 


.ASCIZ 


\FPS BAD AFTER LDCFD (R)+ f A.\ 


I 




(0) 
(!) 


064175 
064175 


114 


041504 


042106 


EM241: 


•ASCII 


\LDCFD CR)+,A FAILED. \ 




g 


(1) 
(1) 


0&4221 
064231 


200 
102 


044124 
052111 


020105 
053440 




.ASCII 
.ASCII 


<CRLF>'THE FD * 

' BIT WAS NOT COMPLIMENTED ■ 


f 




(1 ) 
CO) 


064262 
064300 


04711 1 


051440 


040524 


- — — 

EM242: 


.ASCIZ 


f IN STATE 1 7 . ■ 


< 




(1) 
($) 


064300 
064334 


050106 


020123 


040502 


EH243: 


.ASCIZ 


\FPS BAD AFTER LDCDF (R)+#A„\ 




f 


(1 ) 

(1) 


064334 
064360 


0421 14 


042103 
042510 


020106 
_041MO 




.ASCII 
.ASCII 


SLDCDF (R)+,A FAILRD,\ 
<CRLF> 1 THE FD » 


i 


1 


(1 ) 
It) 


064370 
064421 


044502 
Ml 


020124 
0201 16 


040527 
052123 


— . — . 


.ASCII 
f ASC I Z 


•BIT WAS NOT COMPLIMENTED 1 
•IN STATE 017,' 


i 




(0) 

m 


064437 
064437 


114 


041504 


043104 


EM244? 


.ASCIZ 


\LDCDF lR)*,A RESULT INCORRECT. \ 




f. 




064476 


042114 


043103 


020104 


EM245 : 


.ASCII 


* LDCFD (R),A FAILED.' 




€ 




064521 
064542 


200 
047111 


042523 
051 440 


020124 
040524 




.ASCII 
.ASCIZ 


<CRLF> ' SET SIGN r AILED ' 
'IN STATE 512. f 


€ 






064560 
064614 


0471 25 

047125 


054105 
054105 


042520 
042520 


EM2475 
EM250: 


.ASCIZ 
•ASCIZ 


' UNEXPECTED FPP TRAP TO 244. 1 

' UNEXPECTED CPU TRAP TO 4 . * 




M 
1 




064646 


047125 


054105 


042520 


EM251 J 


•ASCIZ 


'UNEXPECTED CPU TRAP TU 10.* 




1 




064701 


103 


051117 


042522 


EM252? 


. A S C 1 Z 


'CORRECT FLOWS INTERRUPT 1ES1 MOlJUufc r AlLfcU 10 A W A tKHUr I « f 


1 




CO) 


064772 




— — 




EM253: 








1 


CD 
to) 


064772 
065056 


042101 


042104 


040440 


EM254S 


.ASCIZ 


/ADDD ACOfACO FAILED IN AHel INAfcHKUrl CuKKtuCA ri^Uwo./ 


i 


t 


($) 


065056 
0651 43 


042101 


042104 


024040 


EM255 ; 


.ASCIZ 


'ADDD (ROJfACO FAILED AN AHE INAEKKUFA CUHKbCA PAjiUW&./ 


1 






065143 
065231 


101 


042104 


020104 


EM256? 


.ASCIZ 


/ADDD (ROj+j ALO FA1LEP IN Inc. lNltKHUr 1 LUHKC.C1 rAiUWO./ 




1 


(f) 

(0) 


065231 
065320 


101 


042104 


020104 


EM257 ; 


•ASCIZ 


/ADDD @iROA + irACU FAILED IN Anfc ANALKHUrA CUHHbC A rA»uw£>./ 


f 


1 


CO) 


065320 
065406 


042101 


042104 


026440 


EM260? 


.ASCIZ 


/ADDD *"(H0), ALU FAILED AN Inc. ANA t-HHUr A LUKKtl I ItIjUwd./ 


i 




(0) 


065406 
065475 


042101 


042104 


040040 


EM261 S 


•ASCIZ 


/ADDD ( R0 ) # ACO FAILED IN THE INTERRUPT CORRECT F LOWb. / 




t 


CO) 


065475 
065565 


101 


042104 


020104 


EM262: 


.ASCIZ 


/ADDD NUM(R0)fAC0 r AI LED IN THE INTERRUPT CURRECA FLUW&./ 


i 


< 


( SI) 


065565 
065656 


101 


042104 


020104 


EM263 S 


.ASCIZ 


/ADDD $NUM C R0 ) f AC0 FAILED IN THF- INTF.RRUP T CURHbC A p Luwoi / 


i 




(0) 


065656 
065743 


044504 


042126 


024040 


EM264: 


.ASCIZ 


/OIVD ( R0 ) f AC0 FAILED IN THE INTERRUPT CORRECT FLUwS./ 




1.. 


cm 


065743 
066030 


115 


046125 


020104 


EM265S 


.ASCIZ 


/MULD (RO)i-ACO FAILED IN THE INTERRUP1 CORRECT FLOWS./ 




I 




066030 


047515 


042104 


024040 




.ASCIZ 


/MODD fR0) f AC0 FAILED IN THE INTERRUPT CORRECT FLOWS. / 
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066115 



103 051117 042522 EM266; .ASCIZ 1 CORRECT FLOWS INTERRUPT TEST MODULE CAUSED UNEXPECTED INTERRUPT • * 



; THESE ARE ERROR DATA TABLE HEADERS; 



066216 020040 



066257 



107 



042524 052123 DHl J .ASCII • TEST. » <TA8> » CALL AT PC • 1 <TAB> ' ERROR AT PC,'<TAB> 
0521 17 043040 .AS CIZ 'GOT EPS. 1 <TAB> 1 EXPECTED FPS. » 



066306 



020040 
066216 



042524 052123 



DH2S 
0H3*DHl 



.ASCIZ 



TEST, *<TAB>*CALL AT PC . 1 <TA8> ' ERROR AT PC. 



066216 
066216 



DH4=DH1 

DH5-DH1 



066216 
066216 



DH6sDHl 
DH7«DH1 



066216 
066216 
066216 
066216 
066216 
066216 



DHlOsDHl 
DHllsDHl 



DHl 2 S DH I 
DHUspHl 
DH14=DH1 
DH15=DfU 



066347 



066422 



066216 
040 
066216 
020040 



052040 051505 



DH16SDHI 
DHl 7 5 



DH20-DH1 



042524 052123 DH21 t 



066462 
066511 



047507 
040 



020124 
052040 



042506 
051505 



.ASCII 

.ASCIZ 
DH225 .ASCIZ 



ASCIZ 1 TEST. *■ <T AB> * PC O F CALL. * <TAB> f PC OF ERROR. ' <TAB> ' FEC .« <TAB> ' FPS . « 
' TEST. * <TAB> ' PC OF C ALL » <TAB> • PC OF ERROR , 1 <TAS> 



»GOT FEC . 1 <TAB> ' EXPECTED FEC.' 

» TEST, * <TAB> 1 PC OF CALL. 1 <TAB> * PC 



OF ERROR. 1 <TAB> * FPS. * 



066216 
066216 



DH23=DH1 
DH32sDHl 



066216 
066216 



DH24*DH1 
DH25-DH1 



066216 
066216 



DH26«DH1 
DH27-DM1 



066216 
066216 



066216 
066216 



DH30SDH1 
DH31SDH1 
DB33*DH1 
DH34=DH1 



066216 
066216 



DHBSsDHl 
DH36-DH1 



066216 
066216 



DH37*DH1 
DH40=PH1 



066216 
066216 



DH41=DH1 
PH42sPHl 



066216 
066216 



DH4350H1 
DH44SDH1 



066216 
066216 



DH45=DH1 
DH246=DH1 



066216 
066216 



DH46=DH1 
DH47SDH1 



066216 

066216 
06621A 



DH50*DH1 
DH51SDH1 



DH52sDHl 
PH111=DH1 



06621O 
066216 



0H112=DH1 
DH113=DH1 



066557 



066216 
Q49 



52 4 Q515Q5 



DH114=DH1 

0H115; .ASCII « TEST. ' <TAB> 1 PC OF CALL. 1 <TAB> 1 PC OF ERROR. 1 <TAB> 



066620 



047507 
-Q66557. 



020124 042506 



.ASCIZ 
DH116"PH115 



♦GOT FEC. • * GOT FPS EXPECTED FPS.' 
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066557 
066557 



066557 
066557 



066216 
066216 



066216 
066216 



Dril 1 7 
0H120 



= DHU5 
ssDHUS 



DH121 
DH122 



=DH115 
=DHU5 



DH12J 
PH124 
DH125 
DH126 



sDHl 
sDHi 



sDHl 
sOHl 



066557 


DH1 27=DH1 1 5 






066557 


DH1 J0=0H1 15 






066557 


DH1 3l~DHl 15 






066216 


DH1 32«DH1 


__ — __ — , — — — ■ 




066557 


hill ^ ^ i\ 4 4 C 

DH1 335DH1 15 




. ,, 


066557 


DH1 34=DH1 15 






066216 


DH1 35-DH1 






066557 


DH1 36=DH1 15 






066557 


DH1 37SDH1 1 5 




: _ -. ~ 


066557 


DW1 40sDHl 15 






066557 


DH1 4 1 ~DH1 1 5 






066557 


/^ ISA A m- i' I A 4 C 

0H1 42*PH1 15 






066557 


PHI 43*DH1 15 






066557 


DH1445DH1 15 






066216 


DH1 45~DHl 






066216 


fk. ft 1 A t~ aw fN 111 

DH146-DH1 






066il 6 








066216 


DH1 50"DH1 






066557 


DH151-DH1 15 






066557 


DH152=DH1 15 






06655 / 


DH 1 5 3 C DH 1 15 






066557 


0H154*0H1 15 




, : , : 1 


066o5 / 


Dril 55*-DHl 1 5 






066557 


Dhl 56-DH1 15 






0662 16 


Dril 57=Dril 






066557 


DH160^DH1 15 






06621 6 


DHlbl^DHl 






066216 


0H162-DH1 






06655 / 


Unlb j*UH I 1 D 


— — - — — 




066216 


PH164~DH1 






06621 6 


DH5 JssDH I 






066216 


DH54sDHl 






066216 


DH55SDH1 






066216 


DH56-DH 1 






066216 


DH57=DHl 






066216 


DH60sDHl 






066216 


DH6lsDHl 






066216 


DH62=DHt 






066216 


DH63sDHl 






066216 


DH64-DH1 






066216 


DH65=DH1 






066216 


DH66=DH1 






066216 


DH67-DH1 






066216 


DH70=DH1 






066216 


DH71SDH1 






066216 


DH72SDH1 







066216 

JQj6Jl2JL6 



DH73 = 
DH74s 



DH1 
DH1 
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066216 
066216 



DH75sDHl 
PH76SPH! 



066216 
066216 



DH77=DH1 
DH100-DHI 



066216 
066216 



066216 
066216 



DH101=DH1 
DH102*PH1 
DH103=DH1 
DH104SDH1 



066216 
066216 



DH105=0H1 
DH1Q6SDH1 



066216 
066216 



DH107sDHl 
PHllQsPHl 



066557 
066557 



DH165SDH115 
DH166SDHU5 



066557 
066557 



DH167-DH115 
DH170SDH115 



066557 
066557 



DH171=DH115 
DH172-DHU5 



066557 
066557 



DH173*DH115 
DH174SDH115 



066557 
066557 



DH175=DH115 
DH176SDH115 



066557 
066557 



DH177sDHU5 
DH200-DH115 



066557 
066557 



DH201*DH115 
DH202=DH115 



066557 
066557 



DH203-DHU5 
DH204=DHil5 



066557 
Q66557 



DH205=DH115 
DH206SDH115 



066656 
066716 



020040 
020040 



042524 
042524 



052123 
052123 



066756 
067006 



043411 
020040 



052117 
042524 



043040 
052123 



DH220! 
PH2Q7? 



PH210J 



. ASC I Z 
.ASCII 
, ASCIZ 
♦ASCIZ 



TEST, 1 <TAB> • PC 
TEST. * <TAB> % PC 



OF CALL, »<TAB>»PC OF TRAP, 1 
OF CALL. 1 <TAB> 1 PC OF ERROR, 1 



<TAB> ' GOT FPS, * <TAB> » EXPECTED FPS, ' 

' TEST, 1 <TAB> * PC OF CALL * * <TAB> 1 PC OF ERROR, 



067006 
066716 



066716 
066716 



DH2 1 ! sDH2 1 
PH212~DH207 
DH2135DH207 
PH214SPH207 



066716 
067006 



DH215*DH207 
DH216SPH210 



067047 040 052040 051505 DH217: .ASCII • TEST, ' <TAB> 1 PC OF 

067107 Oil 050106 027123 .ASCIZ <TAB> ' FPS . ' <TAB> » FEC . 



CALL, ' <TA8> 1 PC 



OF ERROR, 



067006 
066656 
067006 
066656 



DH221-DH210 
PH222=PH220 



DH223=DH210 
DH224gPH220 



067006 PH225S0H210 

067122 020040 042524 052123 DH226 L^^ASCJLL 

, ASCIZ 
.ASCII 



' TEST. 1 <TAB> 1 PC OF CALL. * <TAB> * PC OF TRAP , * 



067161 
067211 



Oil 

MIL 



047507 
052Q4Q 



020124 
051505 



DH227: 



<TAB> * GOT FEC, ' <TAB> • EXPECTED FEC , ' 
» TEST . ' <TAB> 1 PC OF CALL, * <TAB> 1 PC 



OF TRAP, 1 



< 



067250 



043411 
067122 



052117 043040 



, ASCIZ 
DH230=DH226 



<TAB> ' GOT FPS, '<TAB>' EXPECTED FPS, ' 



067211 



DH231-PH227 
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067300 


020040 


042524 


052123 


DH233; .ASCIZ 


• TEST. , <TAB>«PC OF CALL • ' <TAB> 1 PC 


OF ERROR.* 


067341 
067401 


Oil 


052040 
047507 


051505 
0201 24 


DH234; .ASCII 
• ASCIZ 


' TEST . 1 <TAB> * PC OF CALL. 1 <TA8> 1 PC 
<rAB> f G0T RO . <T AB> 1 EXPEL1 Eu Ru, ' 


OF ERROR. ' 


067427 


040 


052040 


051505 


DH235! .ASCII 


i feet* i yi< k d v I d^< f*ic o m r i ✓ t n d ^ 

1 TEST . 1 <TAB> * PC Or CALL.*<1AB> 


- - - - — ~""~—™— _~ _ 


067453 


120 


020103 


043117 


.ASCII 


•PC OF TRAP . ' <TAB> 


— - — ■ — — ■ ■ — ■■ — • — — — — . 


067467 
06751 3 


040 
120 


052040 
020103 


051505 

04311 1 


DH236: . ASCII 
. ASC I 1 


• TEST. * <TAB> 1 PC OF CALL, 1 <TAB> 
'PL Or ERROR. * ^IAo> * v?ul PL.* 




067537 


Oil 


054105 


042520 


.ASCIZ 


<TAB> f EXPECTED PC.* 

— ■ — — : 


_ __ 




067341 


——————— 




DH237=DH234 




: , _ ______ ____________ 


067555 
067601 


040 
120 


052040 
0201 03 


051505 
043117 


DH240? .ASCII 
•ASCII 


* TEST. »<TAB>'PC OF CALL . 1 <TAB> 
'PC OF ERROR. <TAB> 




067616 


047507 


020124 


050106 


.ASCIZ 


»G0T FPS. * <TAB> f EXPECTED EPS. 1 






067300 
067555 






DH241SDH233 
DH242-DW240 








067300 
067 300 






0H243=DH233 
DH2 44=DH2 33 






067645 


067300 
040 


052040 


051505 


DH245sDH233 
DH247: .ASCIZ 


' TEST . f <T AB> 1 PC OF C ALL . * <1 AB> f PC 


Or 1 HAP . f < I Ao> r bL . * 


067712 


020040 

At "111 !"* 

0677 1/ 


042524 


052123 


DH250S .ASCIZ 

Rule 4 ^ fMLi ^ C A 

DH25 1 =DH250 


» TEST. 1 <TAB> 1 PC OF C ALL ? * <TAB> » PC 


OF TRAP. * 




066306 






DH252=DH2 


: : 






066216 
066216 






DH253sDHl 
DH254SDH1 








066216 
0662 16 






DH255sDHt 
DH256~DH1 








066216 
066216 






DH257sDHl 
Dri260=PH! 


_ , 






066216 
066216 






DH26lsDHl 
DH262=DHi 








066216 
066216 






0H263=DH1 
DH264sDHl 






067752 


066216 
020040 


042524 


052123 


DH2&5=DM1 
DH266; .ASCIZ 


' TEST. • <TAB> ' PC OF CALL . » <TAB> • PC 


OF TRAP, » 




070012 


004 


000 


005 


; THESE ARE THE 
DF15 . BYTE 


DATA FORMAT SPECIFIERS FOR THE DATA 
4. 0,5,0.5, 0,5, Of 5, 5, 3,5, 5, 3 


TABLE : 


070030 


004 
070012 


000 


005 


DF2 • .BYTE 
DF3sDFl 


4, 0,5,0,5, 5,3,5,5,3 






070012 
070012 






DF4sDFl 
DF5*DF1 








070012 
070012 






DF6=DF1 
DF7sDFl 








070012 
070012 






DF10=DF1 
DFU=DFl 








070012 
Q7O012 






DF12*DF1 
DF13aDFl 








070012 
070012 






DF14=DF1 
PF1 5-DF1 
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070012 
070042 004 
070051 004 
070051 



000 



DF16sOFl 

005 DF175 .BYTE 4,0,5,0,5,0,0 



000 



005 DF20: .BYTE 4,0,5,0,5,0,5,0 
DF21SPF20 _ 



070051 
070061 004 



070061 
070061 



DF22=DF20 
5 DF23S .BYTE 
0F24sDF23 

DF32*DF23 



4,0,5,0,5,0,5,0,5,5, 2,5,5,2,5,5,2,5,5,2 



070061 
070061 



DF25sDF23 

DF26=PF23 



070061 
070061 



OF27«OF23 
Of 3QsPF23 



070061 
070105 004 OOP 



OF31SOF23 

005 PF33S .BYTE 4,0,5, 0,5,0,5,0,5,5 ,3,5,5,3,5,5,3,5,5,3 



070105 
070105 



DF34=PF33 
DF35sDF33 



070105 
070061 



DF36=PF33 
DF37=0F23 



070061 
070061 



0F40=DF23 
DF41*DF23 



0700&1 

070061 
070061 
070061 



PF42=PF23 
OF43=DF23 



DF44-0F23 
Pf 45-PF2 3 



070105 
070105 



PF246=DF33 
PF46=PF33 



070105 
070105 



DF47=DF33 
DF50=OF33 



070105 
070105 



0F51sDF33 
DF52=PF33 



070061 
070061 
070061 
070061 



DF111SDF23 
OFH2=DF23 



OF113sDF23 
DF114S0F23 



070131 004 
070131 



000 005 DF1 15 ? .BYTE 4,0,5,0,5,0,0,0,5,5,2,5,5,2,5,5,2,5,5,2 
0F116 = DF115 



070131 
070131 



DF117SDF115 
DF120sDFll5 



070131 
070131 



0F121SDF115 
DF122»DF115 



070105 
Q7Q1Q5 



PF123=PF33 
DF124=DF33 



070105 



DF125=0F33 
DF126sOr33 



070155 004 
070155 



000 005 0F127; .BYTE 4,0,5,0,5,0,0,0,5,5,3,5,5,3,5,5,3,5,5,3 

PF13QSDF127 



070155 



DF131-PF127 
DF132=DF33 



070155 
070155 



DF133=DF127 
DF134=0F127 



070105 
070155 



0F135=DF33 
DF136SPF127 



070131 
Q7QU 1 



DF137»DF115 
DF140=PF115 



070131 

JP-QUl 



0F141=0F1 15 
DFH&sPFUS. 
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DF143=DFH5 
DF144=DFU5 



070061 
070061 



DF145-DF23 
DF146=DF23 



070061 



DF147=DF23 
DF150-DF23 





A ■ _ A — *~ r _~ 

070155 






0F151 =0F1 27 






070155 






DF152«D? 127 






070155 






DF153«DF127 


- - — _____ — __ : . . .... — — 




070155 






DF154S0F127 






070155 






DE 1 55sDFl 27 






070155 






DF156=DF1 27 






070105 






DF1 57-DF3 3 


™ — ___ ; . : : „ 




070155 






0F160-DF1 27 






070105 






DF161=DF33 


: : 




070105 






uFlo2sDF33 






A **_ A. _ 

070155 






DFt63«PF127 


: 




070105 






0F164=DF33 




A 1 A A A 1 

070201 


004 


000 


005 


DF535 .BYTE 






070201 






0F54~DF53 






070201 






Dr 55SDFD i 






070201 






DF56«0F53 






070201 






Dr 57 = Ur b 4 






070201 






DF60sDF53 






070201 






ur o 1 ~ up *> j 


-^-^---^^---^^^^^ . _ __ , : , ______ _ : ______ 




070201 






DF62sDF5i 






070201 






Dr o 4*L?r 5> 4 






070201 






DF64sOF53 






A «t A * 'a a a 

070201 






Pr bb-Ur s 4 






A "1 A ^ A 4 

070201 






DF663=DF53 






070201 






Ur © 7s:Mr D 4 


_____ _ __™________ ____ : : ^^^^^^^ , _ 


Tf /\ '"i 

0702 33 


Aft* 

004 


000 


A A C 

005 


Dr 70S »oi TE 


jiacacacacc ice i>cc'>ec'acc "a 
4 # i 5 # # 5 # # 5 # # 5 # 5#3f5f5 # 4#5r5f3f5 # 5 # 4#5f5f4f5f5f4 




702 44 






Ur / % —UP f 






0702 33 






Dr 72 K DF70 






A *1 A *1 3 2 






act i-nn a 
UP f 4«Ur / y 






070233 






Dp 74«DF70 






A *? A > 3 1 
U / U_ 4 4 






UP / 3-»UP / U 


— - — — . — — ■ . ■ ■ ■ 




A. ^ /V «*_ '-4 

070233 






DF7o s DF70 






07 0«f 4 J 






up / /sup / u 






070233 






DF1 00«DF70 






A ™ A *) 1 2 

70* J 4 






UP 1 1 ""Ur 1 






070233 






0F102«DF70 












AKT1 1 — ACTA 
UP 1UJ>-»UP #U 






070233 






Dr 1 04SDF70 






070233 






DF105=DF70 






070233 






DF106=DF70 






070233 






DF107=OF70 






070233 






OF110SDF70 




070265 


004 


000 


005 


DF1655 . BYTE 


4,0, 5,0,5, 0,0, 0,5,5, 2, 5,5,2,5, 5, 2,5,5,2, 5,5, 7,5,5,2 




070265 






DFlb6=DF165 






0702b5 






DFlt»7sDFl65 






070265 






DF170=DFlb5 






070265 






DF17l=DF165 






070265 






DF172SDF165 






070265 






DF173=DF165 






070265 






DF174SDF165 
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1 


070317 


070265 
004 


000 


005 


DF175*DF165 
DF1 76 S .BY TE 


4,0,5,0,5,0,0,0,5,5,3,5,5,3,5,5,3,5,5,3,5,5,3,5,5,3 






070317 
070317 






DF177=DF176 
DF200s=DFl76 




1 




070317 
070317 






DF201-DF176 
DF202=DF176 


1111 ! ; — _____ : : : -~ — — — — — — , : : 


_ 
1 




070317 
07031 7 




— — - — -— 


DF203=DF176 
DF204=DF176 








070317 
07031 7 






DF205SDF176 
DF206-DF 1 76 




1 


070351 
070361 


004 
004 


000 
000 


005 

005 


DF2105 .BYTE 
DF207 5 .BYTE 


4,0,5,0,5,0,5,0 

4,0,5,0,5,5,5,3,5,5,5,3,5,5,5,3,5,5,5,3 


1 


070405 


070361 

004 


000 


005 


DF211-DF207 
DF21 25 .BYTE 


4,0,5,0,5,0,5,0,5,5,5,3,5,5,5,3,5,5,5,3,5,5,5,3 






070405 
070405 






0F213=DF212 
DF214-PF21 2 




i 




070405 
070361 




. 


DF215=DF212 
DF216sDF207 




1 


070435 


004 
070361 


000 


005 


DF2175 .BYTE 
DF22O-DF207 


4,0,5,0,5,0,0 




: : 


070361 
0703&1 






DF221SDF207 
DF 222~DF207 




< 




070361 
070361 






DF223-DF207 
DF224=DF207 




f 




070361 
070405 






DF225SDF207 
DF226=DF212 








070405 
070405 






DF227sDF212 
DF230«Df 212 




€ 




070405 
070405 






DF231=DF212 
OF232-DF212 




c 


070444 
070461 


004 
004 


000 
000 


005 
005 


DF233? .BYTE 
DF2345 .BYTE 


4,0,5,0,5,5,3,5,5,3,5,5,3 
4,0,5,0,5,0,0 




070470 


004 


000 


005 


DF235! .BYTE 


4,0,5,0 


f 




070461 
070461 






DF236SDF234 
DF237sDF234 


— — • — — — ■■ ■■ — — — • 


_r 

c 




070461 
070444 






DF240-DF234 
DF241-DF233 








070461 
070444 






DF242-DF234 
DF243=DF233 




i 




070444 
070444 






DF244=DF233 
DF2455DF233 




• 


070474 


004 


000 


005 


DF247? .BYTE 
DF250SDF247 


4,0,5,0,5,0 






070474 






DF251=DF247 




c 


070502 
070506 


004 
004 


000 
000 


005 
005 


DF252: .BYTE 
DF25 3! .BYTE 


4,0,5,0 

4.0,5.0.5,0.5,0,5.5.0,5,5,0,5,5,0,5,5,0,5,5,3,5,5,3 


g 




070506 
070506 






DF254-DF253 
DF2S5=DF253 








070506 
070506 






DF256-DF253 
DF257=DF253 




1 




070506 
.070506 






DF260=DF253 
DF261SDF253 




c 




070506 
070506 






DF262=DF253 
DF263=DF253 
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070506 
070506 
070502 



DF264=PF253 
DF265-DF253 



DF266SDF252 



• EVEN 



070540 001232 001234 037151 



; THESE ARE ERROR DATA TABLES (FORNATTED ABOVE); 

DTI ? .WORD STMPQ, STMPl # $TAS,$THP2,$TAB y $TNp5 f STAB, $TMP6 



070560 001313 037156 001240 .WORD $CRLF,MSl f $TMP3 , SCRLF, MS2 f $W4,0 

070576 001232 001234 037151 PT2s .WORD STMPOy $TMPl#$TABy$TMP2f SCRLF, MS3, $TMP3» $CRl>F» MS4# $TMP4» 



070540 
070540 



DT3ssDTl 
DT4=DTl 



070540 
070540 



DT5-DT1 
PT6=DT1 
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.WORD $TMP0,$TMpl, STAB, STMP2, STAB, STMP4, STAB, $TMP3,0 
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81 TO 3 35 


000010 


CORi 1 


A ™i A >*" A A 

032502 


Dr 1 3 =3 


A "*f A A 4 

070012 


A C* A A C 

Dr 206 


<m A T A U 4 *J 

s 070317 




1 


ft A p» v » a _ 

ADDW8 = 


000000 


BIT04 = 


A A A A * r \ A. 

000020 


COR12 


032542 


Dr 1 30 - 


A T A 4 C C. 

/ 1 55 


Dr 207 


070361 


c 




ADDW9 « 


000000 


BIT05 s 


000040 


COP 13 


032602 


Drl31 ss 


0701 55 


Dr 2 I 


Mr #\ *f A /\ It 4 

- 0/0051 






ADEVCT" 


AAA A A A 

000000 


BIT06 s 


A A A 4 A A 

0001 00 


COR2 


A A A A A 

032040 


pr i $ £ — 


A 1 A 4 AC 


A C A 4 a 

Dr 2 1 


A *"? A ~3 fit 4 

070351 




1 _ 


ADEVNf s 


000000 


BIT07 ss 


000200 


C0R3 


032054 


DF133 ss 


070155 


Dr 4 1 1 


— A T A J k 1 

- /0 j61 


i 




AEN V s 


000000 


BXT08 s 


A A AAA A 

000400 


LURii 


032066 




AlAI CC 


DF212 


nlAii AC 

070405 






AEMVM s 


000000 


BIT09 s 


001000 


COR 4 


032126 


DF1 35 35 


A T A 4 A C 

070105 


n f o 4 a 

pr i \ s - 


- A "7 A A A Ci 

- 0/0^03 




f 


AC A X A L - 


A A A A A A 

000000 


BITl ss 


A A ^fc A. A * ) 

000002 


COR 5 


032166 


Dr l 36 — 


A 1 A 4 CC 

70155 


DF214 : 


A *f A >S A C 

= 070405 


1 




AMADRls 


000000 


BIT10 ss 


002000 


C0R6 


032226 


Dr 1 37 ss 


070131 


Pr 2 1 5 


m, A *1 A t A fc 

- / 0403 






AHADR2 S 


000000 


BIT11 ss 


A A j* A A f\ 

004000 




0322 t i 


L!r H — 


A "7 A A i O 
U / OU 1 4 


DF2 16 


_ a. *f A 1 4 

= 070361 






AMADR3- 


000000 


BIT12 " 


oioooo 


C0R8 


032332 


DF140 s 


070131 


pr 4 j / 


A *7 A A 1<% 
U / O 4 3 D 


4 
1 




A!*ADR4 = 


oooooo 


BIT13 a 


020000 


C0R9 


032376 


DF141 


070131 


0F22 


s 070051 






AMAMS1 = 


000000 


BIT14 ss 


040000 


CPSPUR 


036646 


DF142 ss 


070131 


DF220 


= 070361 




c 


AMAMS2S 


oooooo 


BIT15 = 


100000 


CPTWO 


036664 


DF143 3= 


070131 


DF221 - 


= 070361 


€ 
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A C 1 "4 A <•» 

Dr222 - 


070361 


PF4 1 


«• 


Al A Ak * 






A££')4 il 

UQD/ I p 


AU 1 1 1 

uni / / 




U003D / 






A L L ") 1 i, 

066/ I 


DF223 * 


ATA J iL 4 

070361 


DF42 


<m 


A T A /\ t. 1 

/0061 


DHl 20 




A iU <V C T 


A Li 1 




A L L J A t 

6 6 3 6 


n u ') t l 


X 


066216 


DF224 = 


A *f A 1 CL 4 

070361 


DF4J 


mm 


A T A A t» 1 

/OOo 1 


UH 121 




A 1 4. t K T 


r\ Li O A 




066 416 


Un/D / 


I 


0664 1 o 


DF225 » 


070361 


DF44 


<m 


A T A A t. < 

070061 


A Li 4 •*» O 

DHl 22 




066^5 7 


r\LilAA 

PH200 




06655 / 


A Li A t 

PM/6 




06621 6 


DF226 a 


070405 


DF45 




A *t A A, #- « 

070061 


A Li 4 ''\ ^ 

DHl 23 




066 2 I 6 


A £j A A 4 

PM40 1 




06655 / 


A Li A i-. A 

PH260 




066/ 1 6 


DF227 = 


070405 


DF46 




A T a 4 At* 

070105 


DHl 24 




066216 


1"V A A f\ 

Dtt202 


mm 


066557 


DH26 1 


*■* 


066216 


DF23 


A. ■» A A & * 

070061 


pf 47 




A *V A 4 AC 

070105 


rv U 4 -a, jr; 

DHl 25 




066216 


DH203 


■m 


06655 7 


A Li A £. A 

DH262 


mm 


A L L 1 1 i. 

06621 6 


f*i f*t *Hi "% 

DF230 * 


A *V A 4 A t 

070405 


DF5 




070012 


DHl 26 




066216 


t\ Li 1 ft A 

PH204 


mm 


A C C fc C T 

06655 / 


A LI *5 £. "i 

DH26 3 


z 


06621 6 


DF231 * 


070405 


DF50 




A A * At 

070105 


DHl 27 




066557 


PH205 


mm 


06655 / 


A U O L. A 

PH(£64 




066/1 6 


DF232 = 


A "1 A A A f 

070405 


DF51 




A A i| AC 

070105 


DHl 3 




0662 16 


PH206 


mm 


066557 


DH265 


"*" 


06621 6 


DF233 


070444 


DF52 


«a> 


A "f *i « At 

070105 


DHl 30 




066557 


DH207 




066 / 16 


PM266 




06 / /5/ 


DF234 , 


070461 


DF53 




070201 


DH131 


** 


066557 


DH21 




066422 


DH27 


*** 


066216 


DF235 


070470 


DF54 


wm 


070201 


DHl 32 


w 


06621 6 


DH2 1 




A «V "1 A A L. 

067006 


DH3 




A £ i f'j 4 

06621 6 


DF236 a 


070461 


DF55 


S 


070201 


DHl 33 




066557 


DH21 1 


mm 


067006 


DH30 




A £ £ 'T 4 £_ 

066216 


DF237 s 


070461 


PF56 


s 


070201 


DH134 


a 


066557 


DH21 2 


mm 


066716 


DH3 1 


mm 


066216 


DF24 a 


070061 


DF57 




A ft A t^k A A 

070201 


DHl 35 


a 


066216 


DH21 3 


mm 


0667 16 


DH32 


mm 


066216 


DF240 * 


A A. M 0^ 4 

070461 


DF6 


a 


070012 


DHl 36 


a 


A t t" I* 1? 1 

06b557 


DH214 




0667 16 


DH33 




066216 


DF241 a 


070444 


0F60 


a 


A A F *i A A 

070201 


DHl 37 


mr 


066557 


DH2 1 5 




06671 6 


DH34 




06621 6 


DF242 a 


070461 


PF61 




070201 


DHt 4 


"" 


066216 


DH216 




067006 


DH35 


mm 


0662 1 6 


DF243 * 


A «* A A jfc 4 

070444 


PF62 


<m 


A A f\ A 4 

070201 


DHl 40 




066557 


f\ Li 4 1 

DH217 




067047 


DH36 




066216 


DF244 * 


A ^ A J* 4j j| 

070444 


DF63 


*" 


A "1 a r ~* A <l 

070201 


DH141 




066557 


PH22 




a * ^ e < 4 

0665 1 1 


PH3 / 




A L L *) 4 L 

066/16 


A t? A * C mm 

DF245 a 


A *I A A j4 /I 

0/0444 


DF64 




A *J A *1 A 1 

070201 


ft II 4 /I O 

DHl 42 




A L £ L C 1 

06o55 / 


A LA' A ^ A 

Pn2 20 




066656 


A LI A 
PH4 




4fc. iit r " J 4 ink 

060/1 6 


DF246 a 


070105 


PF65 




ATA \l A I 

070201 


ALf 4 A "3 

DHl 4 3 




066557 


L)n4^ 1 


mm 


ALT AAt 

067006 


A Li A A 
PH40 




fit 4*31 i~ 

066/16 


DF247 


Al A 4 1 A 

070474 


0F66 




At A*lA 4 

070201 


DHl 44 




A^ t CC1 

066557 


Pi U A A A 

PH2 22 




066656 


A LI A 4 

PH4 1 




066/16 


DF25 a 


A"1 A 1 

07006I 


DF67 


— 


AT A OA A 

070201 


DHl 45 




066216 


DH22 3 




A 4L 1 AAt 

06 /006 


DH42 




066216 


0F25O » 


070474 


DF7 




070012 


DHl 46 




A t £ A 4 i 

06621 6 


null < 




A£. ii£C£. 


A LI A It 

PH43 


mm 


066/16 


DF251 - 


A *I A A *f A 

070474 


DF70 




A *f A f ) 1 J 

070233 


DHl 47 




A jCT A| 4\ £. 

066216 


DH225 




4^ ^ A iL 

067006 


PH44 


im 


06621 6 


DF252 


A "I A C A A 

070502 


DF71 




A *T A 1 "5 S 

070233 


DH15 




066216 


A Li ' i • > 

DH226 




At"}! A A 

06/122 


PH45 


mm 


066/1 6 


DF253 


aIaC Al 

070506 


DF72 


*" 


070233 


A U 4 C A 

DH150 




066216 


PH227 




06 7 211 


DH46 




066/16 ) 


DF254 a 


At Ai 

070506 


DF73 




070233 


DH151 


mm 


A >{L £ C C 1 

066557 


DH23 




0662 1 6 


DH47 


mm- 


066216 


Dr 255 a 


A*? AC AL 

/ 050© 


nip "t A 

PF74 




0/0233 


DHl 52 




06655 / 


Pn^ SQ 




A/'l 1 A A 

06 / 1 22 


Pri5 


z 


A k 4 O 4 4W 
UDO4? 1 P 


DF256 » 


A 1 A C A 1* 

070506 


DF 75 




A. T A ^ *% i 

070233 


A U 4 £ 3 

DH153 


■mi 


066557 


PH2 3 1 




06/211 


PH50 




066/16 i 


Dr 25 / - 


A 1 A £ A tm. 
/ 030© 


i"\ I~ "7 




a *7 a *°s a 


A U 4 C J* 
PHI 3f 


mw 


06655 / 




mm 


06/211 


A U £ 4 

Pn5 1 




ALL A4 t 

000/ 1 


DF26 


070061 


1* IT* 

PF77 




070233 


A LI 4 C C 

DHl §5 


mm 


066557 


DH233 




A *l S A A 

06 7 300 


A U C O 

PM5 2 




A 6m. im "3 A tm 

066/16 




Al AC At> 


0H1 




0652 1 o 


PH 1 3D 


mm 


06655 / 


A lj O i ^ 

PWZ 4 4 




06 / 44 1 


3 




ALL') 4 
OOO/IO 


DF261 a 


A *1 A C A *; 

070506 


PH10 




066216 


AU 1 C "I 

DH157 


mm 


066216 


DH235 




067427 


AURA 

Pn54 


= 


A Lm. £L. r- J A £m 

066/ 1 6 


DF262 a 


Al A & 

70506 


f\U * A A 

PH100 




0o62 16 


DHl 6 




0662 1 6 


AU<5 J£ 

Un/ J6 




Ail Atl 

06/46/ 


Auec 
UnD5 


I 




DF263 * 


Af AL Ail 

070506 


DHt 01 




06621 6 


DH160 


mm 


066557 


PH237 




067 341 


ny ££ 

PH56 


= 


A i. L J 4 i_ 

066/16 ( 


DF264 a 


A "1 A C A i~ 

070506 


DH1 02 




066216 


DH161 




066216 


r\ o A <i 




06621 6 


Pn5 / 




ALL )1 L 

066/1 6 


DF265 a 


A A t At. 

070506 


PH103 




0bb21 d 


DH162 


** 


066216 


f\ Li "1 /I A 

DH240 




067555 


A LI C 

DH6 




066216 


DF266 * 


A T A C A ^ 

070502 


PH104 


*" 


06621 6 


All 4 t 1 

DH163 




066557 


A Ll '1 yl 4 

DH24 1 




At"? 3 A A 

067 300 


PM60 




A C £m. 'i 1 

066/16 1 


DF27 s 


070061 


DH105 


■** 


066216 


DH164 


mm 


066216 


DH242 




Al C C 

067555 


DH61 


- 

mm 


A £L mL. O 4 L. 

06621 6 


DF 3 a 


07001 2 


DH1 06 


*" 


06621 6 


AM 1 i_ C 

DHl o5 


mt 


Ai. £L C C *1 

066557 


f\UA/l J 

DH243 




A L. T 'S A A 

067 300 


A U W *1 

PH62 




A H. lm. '1 1 t 

066216 


DF30 a 


070061 


DH107 




066216 


DHl 66 


■mr 


066557 


DH244 




067300 


DH6 3 




A i. i A 4 L 

066216 1 


DF31 a 


070061 


PHI 1 


mt 


06621 o 


DHl 6 / 




06655 / 


A U O A C 




A fa. ^ 2 A A 

06 / 300 


A U <L, A 




ALt')1 K 

000/ 1 


DF32 = 


070061 


DH1 10 


** 


06621 p 


DH17 




066347 


A Ll '"i jl J. 

DH246 




A t £- A 4 #_ 

06621 6 


A Li C C 

PH65 




066/1 6 


Dr 3 3 


A •» A 4 AC 
0/0 1 V3 


PH 1 1 I 






hU4 1 A 




06655 I 






A L\ "7 t A C 

00 f 6 45 


nuLk 
unoo 




All )1l 


DF34 a 


070105 


DH1 12 




06b2l6 


DH171 




066557 


DH25 




066216 


DH67 




066216 


DF35 a 


070105 


DH113 




066216 


DH172 




066557 


DH250 




067712 


DH7 




066216 


DF36 = 


070105 


DH114 




066216 


DH173 




066557 


DH251 




067712 


DH70 




066216 


DF37 a 


070061 


DHt 15 




066557 


DH174 




066557 


DH252 




066306 


DH71 




066216 


DF4 a 


070012 


DHl 1 6 




066557 


DH175 




066557 


DH253 




066216 


DH72 




066216 


DF40 = 


070061 


DH117 




066557 


DH176 




066557 


DH254 




066216 


DH73 




066216 
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i 

1. 


DH74 


s 


06621 o 


DTl 44 




A 1 4 AAA 

07 1000 


DT222 


mm 


A 7 4 )C1 

0/1252 


nr A1 — 

U 1 4 1 = 


A 7 A 7 O fc 
U / U / 2 


C M 1 A 9 


A S A 1 1 A 
y 3 ** 1 It 




DH75 


*" 


066216 


D Tl 45 


mm 


A "I A "1 A £. 

0707 26 


DT22 3 




AT 4 -ICO 

71252 


A T A O —> 

P I 4 2 - 


A 7 A 1 O im. 
0/0/26 


C U 1 A J 


At Ail (1 

y 3 4 3 1 y 






DH76 


"* 


A £ t. 1 1 *- 

066216 


PT1 4d 


im 


y /0 / 4o 


U i * i 




A 7 * O £ *> 
0/1232 


ATA 3. — 


ft7fl70h 
v / U / * D 


C M 1 A A 

era x y «* 


as A 499 

V 3 *t *t * * 






DH77 


mm 


06621 6 


DTI 4 / 


im 


T #v *7 *S im. 

070 /26 


Af A1C 

DT225 


z 


0/1252 


A 1' A A 

U 1 44 — 


A T a 7 <1 t 
U / V / 20 


fr M 1 AS 
K*Pf * y 3 


At Akt 7 
y 3 3 D / 




1 

1 


DISPmA 




n J 4 jl A 

00 1 1 42 


DTI 5 




A1 AC Jl A 

070540 


P I 220 


— 


A 7 1 iOA 
/ 1 3 2 4 


r\T Ac — 


AlAIOt 

U f v f 2 


CM 1 A a 


0S4h7h 

U JTtU 1 O 






DI5PRE 




0001 74 


a w 4 r A 

DTI 50 




070 726 


D T22 / 


»£_ 


A T 4 J1/i 

0/1324 


n T A k « 
U i 40 — 


A 7 A 7 O m\ 

y / u / 20 


IT M 1 A 7 

j, y f 


A S S A A S 

y 33y y 3 




- 

4 
1 


DI VDSU 




A € t t 3 A 

01 66 JO 


DTI 5 1 




ATi AAA 

/ 1000 


U 1 4 3 




u / y / *o 


n T A 7 — 


A 7 A *l K 

y / y f * 




AAA a A A 




DX VDT 




01 7060 


PT1 52 


mi 


A "J 4 AAA 

/ 1 000 


P i 2 30 




A 7 1 Ik 1 A 
0/1324 


U l 3 


A 7 A*i A A 

y / y 5» *« y 


fTM 1 1 A 


ASS 1 1 A 






DI vr Su 




A 4 C 1 4 A 

015 no 


nit 4 c 2 

DTI 53 


mm 


A *f 4 AAA 

/ 1000 


U 1 * 3 1 


4MT 


A 7 4 A 'J A 

0/12^0 


U 1 3 U <*» 


A "1 A 7 O *s» 


PTM 1 1 1 


aa 11 ) I 
y ** j f j 1 






DI VFT 




016124 


PT1 54 




A T 4 AAA 

71 000 


PI 232 




A*J i *J & ^ 

0/1252 


fi ? P SI 4 

U 1 3 1 — 


A 7 A 7 9 
U / y / 20 


CB X 4 2 


A A A A f i #4 

y "ttyuo 




4 


D5WR 




1 / / 3 r 


PT1 55 


mm- 


A *l 4 AAA 

0/1 ooo 


ATI 'J ^ 

U 1 I 3 j 


— 


A 7 1 AOt 

f 1 4 20 




ATrtTOt 

y / y f £%> 


ir* n 1 1 3 


A A A A a A 






DTI 




070540 


DT156 


*" 


07 1000 


DTi34 




A 7 4 /» i» "> 

0/1452 


U 1 3 3 


A 7 1 ASA 

/ 1 U34 


ITM 4 4 A 


A A A 1 A 9 
y 4 4 1 *# 2 






DT10 




70540 


DTl 5 / 




0/0 / 20 


P 1 43-> 




A T 4 It A O 

/ 1 502 


A T t\ A — 

U I 3 4 


A 7 1 A Ki A 

y / 1 y 3 4 


PM 1 IS 


A A 4 9 9 1 

y ***** * 1 




4 
1 


PTIOO 


mm 


nil AC 4 

071054 


DTI 6 




070540 


A T A J *1 

DT236 




A 7 4 /ttl 

0/1452 


ul 33 


All A C A 

U / 1 U34 


GUI 1 t 

tun 110 


A A A 9 7 7 
y 4 4 2 f 1 






DTl 1 




A *f 4 AC /I 

071054 


DTl 60 




AT* AAA 

0/1 ooo 


ato a 7 

P 1 # 3 / 




0/1402 


Ul JO 


A7 1 A 5. A 

y / 1 y 3 4 


l Ml l 7 


AAA ^Sft 
y f ** j v 






DTI 02 




a t 4 a e /i 
071054 


T\ fit 4 «V 4 

DT161 




070 /20 


P\ ft A 

PI 24 


- 


AT AT)* 

0/0/20 


1/13 1 ■» 


ATI ACA 

y / 1 y 3 4 


4 9 


A A A 7 1 i 




g - 
1 


DTI 3 


mm 


A T 4 AC i 

071054 


DT162 




70720 


Rf A A A 

PT240 




A 1 4 Atl 

/ I 462 


rift «. 
U 1 — 


A7 At* A A 

/ 03 40 


P M 4 9 A 

turn 2 y 


A A AS 1 A 
y «t 43 1 *f 






DTI 04 




AT i AC J 

071054 


DTl 6i 


tm 


A "i 4 /% A A: 

071000 


P l 2 4 1 




A T 4 Alt. 

/ I 42b 


plTtfl f— 

uiou -» 


A 7 1 A K A 

y / i y 3 4 


STM 1 9 1 
* 2 1 


A A4#%S 9 
y ** ** d j * 






DTI 05 




A T 4 A C A 

7 1054 


PT1 6^ 


mm 


AT AT 1i» 

0/0 / 26 


U 1 fxi. 




A 7 1 AfcO 

0/1 402 


Df ti — 


A 7 1 A *i A 

y 1 1 y 3 ** 


rui 99 


A A S A A 7 




4 

m 


DT106 




71054 


DTl 65 




A 1 4 4 /II 

071142 


P I 24 3 


z 


A 7 4 Alt 

/ 1 420 


n T- o ■» 

U 1 D 2 •» 


A 7 i A K A 

y / * y 3 4 


k'ul 93 

ecu j 


A AS 1 44 






DT107 


** 


A *t 4 A C it 

071054 


DTl 66 


m* 


0/1142 


niBA a A 

P 1 1 44 


4JW 


All A^ im. 

0/1426 


U i 3 ■» 


A9 1 A few A 

y / 1 y 34 


p M 4 9 A 
fun 1 * 4 


A 4 S 9 9 9 

y ** 3 * £■ i. 






DTI 1 




705 40 


DT16 / 




AT 4 4 * 1 

0/1142 


P 1 *45 




A 7 4 Alik 
/ I 420 


U I O 4 •» 


A 7 1 A si A 

y # jl y 3 4 


£ Ml OC 

C*r> 1 i> 3 


A AS 401 




4F 


P T 1 1 H 




A 1 4 i \ C ti 

071054 


Pi 1 / 




o /oo*?^ 


U 1 Z40 




U / U / 2 




v 1 i y 3 1 


d "1 * * Q 


A 4 S 4 S 7 

V/ ** -J mf J 1 






DTI 1 1 




070/26 


PTl /0 




A *1 4 4 AO 
0/114* 


nTT Al 

P * / 4 / 




All CI A 

U / 1 3 1 4 


UlDD — 


ATI A<5 A 

y / 1 y 3 ** 


P M 1 9 7 


A4S4 4ft 

Wis?*! JO 






DT J 1 2 




70/20 


r% rn 4 ** 4 
PI 1 / * 


m» 


A *t 4 4 A '> 


V\ T 1C 

U * *D 




A 7 A "7 9 A 


n t a 7 ~ 


A7 1 ASA 




A 4 1 7 J 

W ** 1 V * * 




M 

m 


DTI 1 3 




0/0/26 


DTl 72 


mm 


A*7 4 4 Jl 

0/1142 


U i 4 5 




A 7 1 SI) 

0/1532 




A7 ASi Aft 

y * y 3=ty 


ETM 1 i A 


A 4 S S 1 4 






rw * * a 

DTI 1 4 




A 1 A t 1 t 

70/26 


on / 3 




A *? 4 4 A'i 

/ 1 1 4 £ 


Af ) C 4 




All CIO 

U / 1 3 3 2 




A 7 4 AC A 

y / i y a <t 


& ri * J 1 


A4S573 

\J Tt J J f J 
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Z 


071 000 


PTl /6 




0/1142 
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A 7 4 K. 

0/1530 
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& rl 1 J »t 
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PI 1 z 
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o /034o 


PI 1 / / 




A *7 4 1 A') 
U / 1 1 4 « 
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A 7 4 CCl 




A71 ASA 
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DTI 20 




/1 000 


PT2 
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U 1 450 




A 7 4 &Cfc 
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A 7 4 AC A 

U / 1 U 3 4 
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A AftS 1 7 
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ATI nj 

Mi 1 21 




A 7 1 AAA 
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Hf OA 
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HT7 a = 
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DTI 22 




071 000 
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PT200 




All 4 A 

071142 
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1 


PJt 123 


s 


0/0*20 


r\ ti» a a 4 

PT201 




A "I 4 t A *5) 
0/114* 


y l .46 o u 




U / 1 330 


frFivnnN 

tiLtfUll 


A 9 A 1 A A 

y 2y * y y 


tTMl A A 


A467 49 

VIO 1 t St 






DT124 




070 726 


T\ nt p% ^\ 

DT202 


mm 


07 1 1 42 


A I s A £L 4 

DT261 




A "T 4 l£ C 

7 1 556 


EEK 1 


A 4 7 A 7 A 

01 /0 /4 


CM 1 A 4 

1 41 * 


- A A 1 7 "i t 

» y 4 J t 3 i 






PI 125 




0/0/20 


r» *i» a ■J 
PT203 




A 7 4 4 A'l 

0/1142 


Ul 46/ 




A 7 4 CCfc 

0/1330 


s pin a 


A 1 7 A 7 A 

y l / 4 f y 


iTM1 A9 3 
& r» 1 4 4 


: A d A An a 




m 
1 


DT126 


• 


070726 


DT204 


s 


07 1 1 42 


A ?T* A *L ^ 

DT203 




A T 4 C C £. 

071556 




A 4 7 C '1 A 

01 /324 


L"il4 A 1 

&Pi 14 3 


A A 7 A ^ 1 

4/031 






PI 1 2 / 




71 000 


il T O A K 

PT205 




A *J 4 4 A*} 

0/1142 
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P * 2 6 4 


z 


A 7 4 K. R 

0/1330 




y 1 f 3oy 


p-MI A A 


A 4 7 1 A 7 

y 4 f 1 v f 






DTl 3 


** 


070540 


PT206 




071142 


DT265 




071556 


btiL 1 3 


A 4 lt( A 

01 /6 1 4 


C M 1 AC 
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A A 7 4 #^ *v 
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1 


PI I 39 




A 1 4 AAA 
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u l 400 




All C A A 

0/1344 


£T j? IT 9 


A 1 7 1 «n 


E MI At 

cun 4, to 


A47 4 4 4 
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DTI 31 




071000 


DT21 




070666 


t\TAT 

DT27 


mm 
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070726 


tLL3 


A 4 T 4 ^ >l 

017 104 


P Ml 4 A 7 

tiM 14/ 


A A 7 t» A A 
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PIl 32 


■mm 


A Tf A 7 1 K 

/ / »? o 
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PT2 1 




A 7 4 J "1 A 

0/1230 


ATI 
P 1 3 




A 7 A R A i\ 

/ 0340 


EEE4 


A 1 7 9 9 A 

y 1 / * 2 y 


wu 1 s 

till J 


A 4 1 9 S A 




m 
1 


DTI 33 




071000 


DT21 1 


"* 


071252 


DT30 
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01 f 254 
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04 f 4 4 






PI 1 3 $ 


mm 
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A T ■> 4 
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p t • P t, 
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DTI 35 


mm 


070 726 


PT21 3 


•» 


071 324 


DT32 




A 7 A "J 'I L 

0707 26 


E E>E 7 


a 4 1 1 A A 

01 / 344 


P U 4 CO 

&M132 


A C A A 7 t 
0300 /0 




4 






nil AAA 
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U X / I ** 




A 7 4 '4 '> A 






A 7 A 7 ') K 
U / v / * O 


bbEiQ 


A 4 7 A A A 

y 1 / ** y y 


(• MIS) : 


; A 4 S 1 4 4 

" Vf ^ J JL Tt "f 






DT137 




071000 


DT215 




071324 


DT14 




070726 


E£E9 


017434 


EM154 ; 


s 045222 






DT14 




070540 


DT216 




071252 


DT35 




070726 


EMTVEC= 


000030 


EM155 


050165 




c 


DT140 




0710QO 


DT217 




0714Q6 


DT36 




070726 


EH1 


037660 


EM156 


050243 






DT141 




071000 


DT22 




070710 


DT37 




070726 


EM10 


040477 


EM157 


050322 






DT142 




071000 


DT220 




071252 


DT4 




070540 


EM100 


053635 


EM 16 


041362 




t 


DT143 




071000 


DT221 




071252 


DT40 




070726 


EM101 


053720 


EM160 


050467 





MAINDEC 


• 1 1 ~PFFPB»A 


PDF 11/34 


FPP DIAGNOSTIC 


PART 2 MAC 1f 1 1 27(1006) 


07 -FEB"» 7 7 


12506 PAGE 169 








PFFP8A*P11 0l-NOV*76 


21 506 


SYMBOL TABLE 










— . — . — - — 


- . 


EM161 


050625 


EM 2 4 


041756 


EM57 


051643 


GGER6 


10402 


/"* T 


007144 




E M l 6 2 


050772 


EM 2 4 


0641 41 


EMS 


040265 


r* jt* c* ra *t 

GGER7 


010450 


Gb.O 


00 1 ill 




"EMI 63 


051136 


EM241 


064175 


EM60 


051733 


f > ft ft 

GGER8 


010546 


r* a 

GG9 


t\ ft ^1 ^ 

007 222 




EM164 


051273 


EM242 


064300 


EM61 


052035 


GGER9 


01061 4 


/"^ T C* i»! O « 


104405 




EM165 


055224 


EM243 


064334 


EM62 


052231 


GGGDON 


025712 


it I, r\ a in /-\ 

HH0AT0 


006606 




EM166 


055310 


EM244 


064437 


EM63 


052425 


GGGl 


024240 


HHD0N& 


A A L T C l. 

006756 




EM167 


055373 


EM245 


064476 


EM64 


052536 


GGGl 


02501 


HHERO 


005626 




EMU 


041457 


EM246 


043341 


EM65 


052655 


GGGl 1 


025060 


1 1 11 c n A rt 

HHEROO 


rt ft C ^1 >l ft 

005 742 




EM170 


055425 


EM247 


064560 


EM66 


052770 


GGGl 2 


025130 


u Li n 4 


ft ft C £: "7 j| 

005674 




EMI71 


055513 


EM25 


042054 


EM67 


053037 


GGGl 3 


025200 


HHER1 


006470 




EM172 


055636 


EM250 


064614 


EM7 


040372 


GGGl 4 


025250 


U U t' D I 


0060 1 U 




EM173 


055723 


EM251 


064646 


EM70 


05 3122 


ft f- f* n 

GGG2 


024310 


r(Wc.K3 


006056 




EM174 


056071 


EM252 


064701 


EM71 


053153 


GGG3 


024360 


(TMJLR4 


0061 44 




EM175 


056237 


EM253 


064772 


EM72 


053203 


GGG4 


024430 


u y c d c 


0061 1 i, 




EM176 


056351 


EM254 


065056 


EM73 * 


053203 


GGG5 


024500 


ji jjl ^ 

nnCino 


ft ft >l / 1 

006240 




EM177 


056435 


EM255 


065143 


EM74 


053235 


GGG6 


024550 


rlriCiR 7 


006406 




EM2 


037712 


EM256 


065231 


EM75 


053344 


GGG7 


024620 


U U C D Q 

HH&R8 


006334 




EM20 


041534 


EM257 


065320 


EM76 


053435 


GGG8 


024670 


U U Ir U (3 

Hrifc.R9 


0064/4 




EM200 


056520 


EM26 


042141 


EM77 


053525 


GGG9 


024740 


HHHDuN 


030020 




EM201 


056552 


EM260 


065406 


ERM10 


034156 


GGP1 


01 1564 




025/16 




EM202 


056641 


EM26 1 


065475 


ERRVEC- 


000004 


GGP2 


01 1574 


fc.,1 LI 1.1 4 ft 

HHH 1 


02/016 




EM203 


057003 


EM262 


065565 


ERTXPE 


036140 


GGP3 


ft 4 4 ft j* 

01 1604 


Hrln I I 


OZ / I 1 6 




EM204 


057145 


EM263 


065656 


ERT1 


036324 


GGP4 


M 4 4 £ . 4 il 

011614 


HHH I 2 


027216 




EM205 


057233 


EM264 


065743 


ERT2 


036560 


f f CJ c 


f\ A t till 

01 1624 


UUU1 "i 


rt O T i 1 K 
i, 1 J 4 O 




EM206 


057401 


EM265 


066030 


ERT3 


036564 


GGP6 


ft 4 4 j£L ^ .A 

01 1634 


HHn2 


026016 




EM207 


057547 


EM266 


066115 


ERT4 


036576 


GGP7 


ft 4 4 £L >l il 

1 1644 


tl Li Li "3 

nnn S 


026116 




EM2l 


041566 


EM27 » 


042054 


ERT5 


036610 


GGP8 


011654 


f 1 £J LI A 

HHH4 


ft *\ Al f % 4 

026216 




EM210 


057611 


EM3 


037746 


FFFDON 


020630 


GGP9 


011664 


yynr 

nnnS 


026 316 




EM211 


057653 


EM30 


042237 


FFF1 


020104 


GG1 


006762 


HHHf> 


026416 




EM212 


060017 


EM31 


04231 1 


FFF2 


020160 


GG10 


007256 


LI U Li T 

Htln / 


026516 




EM213 


060203 


EM 3 2 


041724 


FFF3 


020234 


GG1 1 


ft ft **1F *\ 4 j| 

007314 


HHHe 


026b 1 6 




EM214 


060367 


EM33 


042356 


FFF4 


020310 


GG1 2 


007336 




026 / 1 6 




EM215 


060553 


EM34 


042401 


FP5PUR 


03661 4 


GG1 3 


007346 


HHP0 


006616 




EM216 


060737 


EM35 


042433 


FPVECT* 


000244 


GG1 4 


007364 


HHP 1 


006626 




EM217 


061 121 


EM36 


042506 


GGDATO 


011554 


GG15 


007422 


nun * a 

HHP10 


0067 36 




EM22 


041620 


EM37 


042554 


GGDONE 


011674 


GGi 6 


A A 1 ill A A. 

007440 


U Li fi < 4 

HHP 1 1 


ft ft L '7 /I k 

006 / 46 




EM220 


061 163 


EM4 


040053 


GGERO 


010052 


GGI 7 


007506 


HHP2 


006636 




EM221 


06141 3 


EM40 


042577 


GGER1 


010150 


GGI 8 


ft ft T C 4 i- 

0075 1 6 


nun 1 

HHP 4 


0066*16 




EM222 


061657 


EM 41 


042631 


GGER10 


010662 


GG19 


007552 


HHP4 


ft ft c £^ 

006656 




EM223 


062110 


EM42 


042704 


GGERl 1 


010730 


GG2 


ft A **§ A ft 

007020 


Li Li D C 

HHPs 


006666 




EM224 


062355 


EM43 


043035 


GGERl 2 


010776 


GG20 


007610 


HHP6 


006676 




EM225 


062606 


EM44 


043166 


GGERl 3 


011044 


GG21 


007632 


HHP7 


ft ft 4L /\ jL. 

006706 




EM226 


063053 


EM45 


043234 


GGERl 4 


011112 


GG22 


007642 


ntlro 


0067 16 




EM227 


063206 


EM46 


043307 


GGERl 5 


011210 


GG23 


007660 


HHPy 


006 / 26 




EM23 


041 701 


EM47 


043364 


GGER16 


01 1256 


GG24 


007716 


HHTRAP 


006536 




EM230 


063341 


EM5 


040160 


GGERl 7 


Oil 324 


GG25 


0077 34 


HH1 


ft ft CL ii 'i 

005O36 




EM231 


063475 


EM50 


043520 


GGERl 8 


Oil 372 


GG26 


010002 


HH1 


005250 




EM232 = 


05761 1 


EM51 


043573 


GGERl 9 


011440 


GG27 


ft 4 A /% 4 ~'i 

01001 2 


O Li 4 4 

HH 1 1 


005)466 




EM233 


063631 


EMS 2 


043641 


GGER2 


010216 


GG28 


010046 


HH1 2 


005316 




EM234 


063670 


EM53 


051471 


GGER20 


01 1506 


GG3 


007042 


HH13 


005340 




EM235 


063754 


EM54 


051522 


GGER3 


010264 


GG4 


007052 


HM1 4 


A A C J / i 

005360 




EM236 


064022 


EM55 


051437 


GGER4 


010332 


GG5 


007070 


HH15 


005370 




EM237 


064055 


EM56 


051552 


GGER5 


010334 


GG6 


007126 


HH16 


005376 
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HH17 


005414 


HX17 


012264 


MMM2 


030076 


OVFTT 


023262 


SW4 = 


000020 




HH18 


005452 


HX18 


012322 


MMW3 


030150 


OVUNDN 


022020 


SW5 = 


000040 




HH19 


005474 


HX19 


012342 


MMM4 


030222 


QtfUNDT 


023622 


SW6 a 


000100 




HH2 


005066 


HX2 


011730 


MMM5 


030274 


ovumfn: 


021060 


Sw7 a 


000200 




HH20 


005504 


HX20 


012352 


MNUMBEs 


000266 


OVUNFT 


022660 


SW8 = 


000400 






00552? 


HX21 


012354 


MODDDO 


031754 


PIRQ = 


177772 


SW9 a 


001000 




HH22 


005552 


HX22 


012404 


MQDDD1 


031764 


PIRQVEa 


000240 


TAB a 


000011 




HH23 


005574 


HX23 


012424 


MQDQOV 


031366 


POWERM 


037104 


TBITVEs 


000014 




HH24 


005604 


HX24 


012444 


MODOSU 


027422 


PROGNUa 


000002 


TKVEC s 


000060 




HH25 


005622 


HX25 


012454 


MODOTO 


030000 


PRO a 


000000 


TPVEC = 


0O0O64 




RH3 


005110 


HX26 


012462 


M0DDT1 


030010 


PR1 " 


000040 


TRAPVEa 


000034 




HH4 


005130 


HX27 


012464 


MQDFDO 


030726 


PR2 a 


000100 


TRTVECa 


000014 




HH5 


005140 


HX28 


012516 


MQDFD1 


030736 


PR3 9 


000140 


TST1 


005034 




HH6 


005146 


HX29 


012540 


MODFOV 


030352 


PR4 a 


000200 


TST10 


017072 




HH7 


005160 


HX3 


011744 


MODFSU 


025324 


PR5 s 


000240 


TST11 


020102 




HH8 


005216 


HX30 


012550 


MODFTO 


025662 


PR6 « 


000300 


TST12 


020632 




HH9 


00524Q 


HX31 


012566 


MQDFT1 


025672 


PR7 a 


000340 


TST13 


021472 




HT a 


000011 


HX32 


012616 


MODPt 


025702 


PS a 


177776 


TST14 


022432 




HXDATO 


013304 


HX33 


012640 


MSA1 


036760 


PSW a 


177776 


TST15 


023274 




HXDONE 


013414 


HX34 


012650 


WSA2 


036776 


PWRVEC== 


000024 


TST16 


024236 




HXERl 


012672 


HX35 


012666 


MSA3 


037021 


RDCHR a 


104407 


TST17 


025714 




HXERIO 


013162 


HX4 


011764 


HSA4 


037033 


RESREGa 


104411 


T-ST2 


006760 




HXER 1 1 


013214 


HX5 


012004 


M5A5 


037051 


RESVEC- 


000010 


TST20 


030022 




HXERl 2 


013234 


HX6 


012014 


MSA6 


037064 


RSETUPs 


104412 


TST21 


030750 




HXERl 3 


013264 


HX7 


012022 


MSI 


037156 


R6 a 


1000006 


TST22 


031776 




HXER2 


012732 


HX8 


012040 


MS10 


037355 


R7 = 


1000007 


TST23 


033150 




HXER22 


012746 


HX9 


012072 


mil 


037377 


SAVREG= 


104410 


TST3 


011676 




HXER 3 


012762 


1IID0N 


021470 


MS12 


037423 


SPACE 


037153 


TST4 


013416 




HXER33 


012776 


nu 


020^34 


MS2 


037174 


STACK a 


001100 


TST5 


014424 




HXER4 


013012 


III2 


020700 


MS3 


037214 


START 


004336 


TSTb 


015126 




HXEP5 


012712 


III3 


020744 


MS37 


037446 


STKLMTs 


177774 


TST7 


016136 




HXER6 


013046 


III4 


021010 


MS4 


037243 


SwR 


001140 


T^PE a 


104401 




HXER66 


013062 


IQTVECa 


000020 


MS40 


037464 


S^REG 


000176 


TiPOC a 


104402 




HXER7 


013076 




022430 


MS41 


037520 


SNO a 


000001 


TiPOH a 


104404 




HXER8 


013030 


JJJl 


021474 


MS415 


037500 


SWOO « 


000001 


TlfPOS s 


104403 




HXER9 


013126 


JJJi 


021560 


MS42 


037544 


SwOl s 


000002 


SAPTHD 


004322 




HXP1 


013314 


JJJ 3 


021644 


MS43 


037562 


SW02 a 


000004 


$ATXC 


035010 




HXP2 


013324 


JJJ4 


021730 


MS44 


037577 


SW03 a 


000010 


SAT^l 


034764 




HXP3 


013334 


KKKOON 


023272 


MS5 


037271 


SN04 a 


000020 


SATX3 


034772 




HXP4 


013344 


KKK1 


022434 


MS6 


037313 


SW05 a 


000040 


$ATY 4 


035002 




HXP5 


013354 


KKK3 


022500 


MS7 


037331 


Sw06 = 


000100 


$AUTOB 


001134 




HXP6 


013364 


KKK4 


022544 


MULDSU 


020370 


SW07 = 


000200 


$BASE 


001372 




HXP7 


013374 


KKK5 


022610 


MULOT 


020620 


SW08 * 


000400 


SBDADR 


001122 




HXP8 


013404 


LF a 


000012 


MULFSU 


017654 


SW09 a 


001000 


SBDDAT 


001126 




H X 1 


011700 


LLLDON 


024234 


MULFT 


020070 


Swl = 


000002 


SbELL 


001306 




HXiO 


012106 




023276 


fiNNDON 


031774 


SwlO a 


002000 


SCDWl 


001376 




HXU 


0121 30 


LLL2 


023362 


NNN1 


030752 


SWH a 


004000 


$C0W2 


001400 




HX12 


012150 


LLL3 


023446 


N N N 2 


031054 


Svi%2 - 


010000 


SCHARC 


034532 




HX13 


012160 


LLL4 


023532 


NNN3 


031156 


Swi3 a 


020000 


SCKSWR 


035232 




HX14 


012166 


LOOP 


005034 


NNN4 


031260 


SW14 a 


040000 


SCLR.T 


033352 




HX15 


012204 


LPERR a 


104413 


OVDNTT 


022420 


SW15 a 


100000 


SCMTAG 


001100 




HX16 


012232 


MMMOON 


030746 


QVDTT 


024224 


Sw2 a 


000004 


$CMl a 


000024 




HX165 


012236 


M M M 1 


030024 


OVFNTT 


021460 


SW3 a 


000010 


SC^2 a 


000050 
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C PFFPBA,Ptl 01-NQV-76 21*06 5YHB0L TABLE; ~" " C 



Ml 

1 


SCW 3 * 
SC*4 = 


000024 
000024 


SEPTTL 

SESCAP 


oonu 

001304 


$M$GTx 
$MS*iR 


001316 
03564b 


$REG3 
S REG4 


001170 
001 172 


STMP20 
STMP21 


001272 
001274 


t 




SCNTLG 
SCNTLU 


035t»41 
035634 


SETABL 
$ET£ND 


001336 
001442 


SMTlfPl 
SMTYP2 


001347 
001 353 


SREG5 

SREG6 


001174 
001 176 


STHP22 
STMP23 


001276 
001300 




1 - 


SCPUOP 
SCRLF 


001344 
001313 


SFATAL 

SFFLG 


001320 
035230 


$MT¥P3 
SMTYP4 


001357 
001 363 


SREG7 

$ RESRE 


001200 
034216 


SIMP 3 
$TMP4 


001240 

001242 


f 


MT 

1 


SPDWO 
SDDwl 


001402 
001404 


SFILLC 
$FILLS 


001156 
001155 


SMXCNT 
SNULL 


033720 
001 154 


SRTNAD 
SRTRN 


033432 
033426 


$TMP5 
STMP6 


001244 
001 24fe 


\ 




S0DW10 
$001*1 i 


001426 
001430 


SGOADR 
SGDDAT 


001 120 
001124 


$NWTST= 
SOCNT 


000001 
034760 


SSAVRE 
$SAVR6 


034160 
036136 


$TMP7 
$TN = 


001250 
000023 




i 


SPDW12 
S0DW13 


001432 
001434 


SGET42 

SGTS^R 


033334 
035302 


SOMQPE 
SOVER 


034762 
033704 


$SCOPE 
SSETUPs 


033442 
0001 37 


STPB 

STPFLG 


001152 
001157 


i 


i 


$DDWl 4 
S DOW IS 


001436 
001440 


SHD s 
$HI»TS 


000003 
004322 


SPASS 
$PASTM 


001324 
004330 


$STUP * 
$SVLAD 


177777 
033650 


STPS 
STRAP 


001150 
035670 


i 




SPPW2 
S0PW3 


001 406 
001410 


SICNT 
SILLUP 


001104 
036132 


SPWRAD 
SPWRDN 


036114 
035754 


$SVPC « 
SSWR - 


004322 
1 77400 


STRAP2 
STRP s 


035712 
000014 




t 


$DPw4 
S DDW5 


001412 
001414 


SINTAG 
S ITEMS 


001135 
001114 


SPWRMG 
SPWRUP 


036110 
036026 


SSWREG 
SSWRMKx 


001340 

000000 


STPPAD 
STSTM 


035724 
004326 


€ 


1 


$DDW6 
SDDW7 


001416 
001420 


$LF 
$LFLG 


001314 
035227 


$QUES 
SRDCHR 


001312 
035514 


$SWRMS= 
STAB 


000200 
037151 


STSTNM 

STYPE 


001102 
034254 


MP 

I 




SPPW8 
SDDH9 


001422 
001424 


SLOOP 
$LPADR 


033430 
001106 


SRDSZ ss 
SREGAD 


ooooot 

001 160 


STB IT 
$TERM s 


033434 
000030 


STXPEC 
STYPEA 


034466 
034534 




f 


SDEVCT 
SDEVM 


001326 
001 374 


SLPERR 
SMADRl 


001X10 

001350 


$REG0 
$REG1 


001 162 
001 164 


STESTN 
STIMES 


001322 
001 302 


STYPOC 
$T¥PQN 


034562 
03457^ 


c 


c 


$POAGn 
$£NDAD 


033372 
033362 


SMA0R2 

SMADR3 


001354 
001360 


SREG10 
$REGt 1 


001202 
001204 


$TKB 
$TKS 


001146 
001 144 


STYPOS 

$UNIT 


034536 
()0li3u 


I 




SENDCT 
SENULL 


033204 
033436 


SMAPR4 

SMAIL 


00l3t>4 
001316 


$REG12 
SREG13 


001206 
001210 


$TMPO 
STMP1 


001232 
001234 


SUNITM 
SUSwR 


004332 
001342 




1 


$ENV 
sENVM 


001336 
00U37 


$MAHS1 

$MAMS2 


001346 
001352 


SREG14 
$REG15 


001212 
001214 


STMP10 
$TMPU 


001252 
001254 


SVECT1 

$VECT2 


001366 
001370 


t 


1 


$EOP 

SEPPCT 


033150 
033176 


$MAMS3 
SMAMS4 


001356 
001362 


SREG16 
SREGl 7 


001216 
001220 


STMPt 2 
STHP13 


001256 
001260 


SXTSTR 
$$GET4s 


033454 
000001 


€ 




$ERFLG 
SERtfAX 


001103 
001115 


SHBAPR 
$MFLG 


004324 
035226 


$REG2 

$REG20 


001166 
001222 


STHP14 
$TMP15 


001262 
001264 


SOFIbL 


034761 
07 1644 




€ 


$ ERROR 
SERRPr 


033722 
001116 


$MMEW 

SMSGAD 


035657 
001332 


SREG21 

SREG22 


001224 
001226 


STMP16 
STMPl 7 


001266 
001270 


.LPER 
.RSKT 


036702 
036710 


( 


C 


SERRTB 


001442 


SMSGLG 


001334 


SREG23 


001230 


$TMP2 


001236 


■ $ X = 


004322 


< 




• ABS. 


071644 


000 


















c i 


i 


ERRORS DETECTED? 
DEFAULT GLOBALS 




GENERATED: 
















i 




*DFFP8/S 


t.SEU/SOL= 


PFFPBA.P1 1 




















RUN»TIME ; 27 22 
RUN-TlHE RATIO: 


1 SECONDS 
599/50=11.8 
















i 


i 


CORE USED: 31K 


(61 PAGES) 
















t 




i 






















i 


I 
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